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When you can find and fix bugs at 
the earliest possible moment, creating 
software stops being such an uphill grind. 

And the Smart/C Environment makes 
it possible. It’s a complete, fully-integrated 
development environment for C that saves 
you from the creativity-inhibiting cycle 
of edit, compile, re-edit, re-compile, link, 
load, test, re-edit, re-compile, etc., ad 
infinitum. Smart/C puts the fun back in 
programming, because you spend your 
time creating... not waiting. 

Here’s why. Syntax errors are elimi- 
nated automatically as code is entered. 
Smart/C’s highly integrated editor and 
interpreter allow you to interpret your pro- 
gram at any time in the creation process, so 
logic errors can be ferreted out as soon as 
the algorithm exists—long before any 
compile, link, or load. 

The complete integration of the edi- 
tor and interpreter means you can stop 
anywhere in the interpret cycle, edit, and 
then go right back into the interpreter 
exactly where you left off. Not only that, 
the screen-oriented user interface lets you 
see all operations, even interpretation, 
right on the listing of the code. 
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And to make maintenance program- 
ming easier, Smart/C’s Migrator allows 
existing C code produced with any editor 
to be modified and run within the Smart/C 
Environment. 

All of which makes Smart/C an excel- 
lent tool. It’s flexible, non-restrictive, and 
lets you create elegant, readable, error- 
free programs that you can watch run with 
a great feeling of satisfaction. 


Smart/C" 


Free 
Demo Disk! 


To fully appreciate Smart/C, you have to see it in 
action. For your free IBM PC MS-DOS demo disk, call 
us. Or write us on your company letterhead. 

AGS Computers, Inc., Advanced Products Division, 
1139 Spruce Drive, Mountainside, NJ 07092. 
800-AGS-1313. In NJ, 201-654-4321. 
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Smart/C Features 


The Smart/C Environment 

O Fully integrated editor and interpreter 
C Only one load brings them both in 

O One command set 

© Move between one another at will 


Syntax Directed Editor 

O vi-like command set 

0 Automatically provides formats for blocks, for, 
case and if statements 


Interpreter 

O Current module can call external modules during 
interpretation 

OC Has Include capability 

0 Totally precompilation—no incremental compile 

C Can interpret partially defined files allowing for 
rapid prototyping 

O Variable speed of interpretation 

C1 Multiple windows with user-defined sizes 


The Smart/C Migrator 

C Allows C code produced with any editor to be 
interpreted by Smart/C 

OC Reformats for readability 


Smart/C has been ported to UNIX™ System V Release 2, 
Berkeley 4.2, Xenix,™ and MS-DOS. Versions run on 
8086- and 68000-based machines, as well as proprie- 
tary architectures. Smart/C runs on PCs, micros, 
supermicros, minis, and even mainframes. 


Trademarks—Smart/C: AGS Computers, Inc.; UNIX: AT&T Bell Labs; 
Xenix and MS-DOS: Microsoft Corp; IBM PC: IBM Corp. 
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C- personal 


Living Cis the fully integrated interactive 
programming environment for C.B 


replacing the headaches of 
C with total control and und 
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mind that 75° 
and understand why it works or doesn't!! 


| suite of programming tools.are 


automatically available. Combined with your rapid increase in 
productivity and understanding, you will now find that 


You simply compile in your C source and 
maintenance time is dramatically reduced. 


leave the rest to Living C! Living C not only 
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FULL SCREEN 


the exciting solution to ma 
creativity and productivity. 
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eg Microsoft, Lattice, Computer Innovations. Aztec) 
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sontnetoiveemme 1 800 826-2612 


patibles. You will need PCDOS, either twin floppy disk 


g Cas an interpreter 


e C compiler 


(i) Simply switch off the animation and use Livin 


(ii) Recompile your application into your favourit 
(iii) Use the optional Living C code generator ($99) 


What machines does Living C - Personal run on? 


You have 3 choices: 
Living C, Living C - Personal and Animating C Interpreter are trade marks of Living Software 


Living Software, 250 North Orange Avenue, Suite 820, Orlando, Florida 32801 


Living C - Personal is available for the IBM PC and all com 
drives or a floppy and a hard disk with 192K RAM. 
Just fill out the coupon and send it to us along with $99 or call u 


How dol order Living C - Personal? 
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are: 


3930 Freedom Circle, Suite 101, Santa Clara. CA 95054 





Mailing Address: P.O. Box 60337, Sunnyvale, CA 94088 
(408) 733-2919 @ Telex (ITT) 4990808 
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Automatic program formatter. 


FirsTime is a true syntax directed editor. 


FirsTime ensures the integrity of your programs by 
performing all editing tasks like moves, inserts and 
deletes along the syntactic elements of a program. 
For example, when you move an IF statement, 
FirsTime will move the corresponding THEN and 
ELSE clauses with it. 


Even FirsTime’s cursor movements are by syntax 
elements instead of characters. The cursor automati- 
cally skips over blank spaces and required keywords 
and goes directly to the next editable position. 


FirsTime is a Syntax Checker 


FirsTime checks the syntax of your program 
statements, and also: 
@® Semantics like undefined variables and 
mismatched statement types. 
@ The contents of include files and macro 
expansions. 


@ Statements for errors as they are entered 
and warns you immediately. 


FirsTime is a Program Formatter 


FirsTime automatically indents statements as they 
are entered, saving you from having to track indenta- 
tion levels and count spaces. 


Slash Programming Time in Half! 


FirsTime 
Fast program entry through single keystroke statement generators. 
Fast editing through syntax oriented cursor movements. 


Dramatically reduced debugging time through immediate syntax checking. 
Fast development through unique programmer oriented features. 


FirsTime has Unique Features 
No other editor offer these features: 


The Zoom command gives you a top down view 
of your program logic. 


The View command displays the contents of 
include files and macro expansions. This is 
valuable to sophisticated programmers writing 
complex code or to those updating unfamiliar 
programs. 


FirsTime’s Transform commandlets you change 
a statement to another similar one with just two 
keystrokes. For example, you can instantly trans- 
form a FOR statement into a WHILE statement. 


The Move at Same Level command moves the 
cursor up or down to the next statement at the 
same indentation level. This is very useful. For 
example, you can use it to locate the ELSE 
clause that corresponds to a given THEN clause 
or to traverse a program one procedure at a 
time. 


FirsTime is Unparalleled 


FirsTime is the most advanced syntax directed 
editor available. lt makes programming faster, easier 
and more fun. 


TO ORDER CALL (201) 741-8188 


or write: 


Spruce Technology Corporation 


189 E. Bergen Place 


Red Bank, NJ 07701 
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In Germany, Austria and Switzerland contact: 


Markt & Technik Software Verlag 
Munchen, W. Germany 
(089) 4613-0 


FirsTime is a trademark of Spruce Technology Corporation @ MS-DOS is a trademark of Microsoft Corporation 
IBM is a trademark of International Business Machines, Inc. @ Turbo Pascal is a trademark of Borland International 
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EDITORIAL 








e’d like to congratulate Microsoft, Lifeboat, and PC World for 
VV their jointly-sponsored C-85 conference in San Francisco in May. 

All the DDJ editorial staff attended (Allen Holub, our C columnist, 
and Richard Relph, coordinator of the C compiler review in this issue, were 
among the speakers), and we found it educational and well-planned. 

One session was of particular interest to us. At a discussion of compiler and 
library evaluation and benchmarking, a speaker chastised computer publica- 
tions for the inadequacy of their technical reviews. We sat in the audience » 
nodding in agreement. 

It’s true: today’s computer magazines typically do not provide adequate 
information to permit software developers to choose one compiler or program- 
ming tool over another. A relatively conscientious reviewer may (1) run three 
benchmark tests, usually a floating-point test, the Fibonacci and the Sieve of 
Eratosthenes; (2) list the product’s features; and (3) give a clear picture of his 
own experiences in using the product. Most do less. 

The C-85 conference session pointed out the need for a higher level of 
criticism, at least in the evaluation of technical products. This is an area in 
which the vendors and customers are both highly knowledgable. Programmers 
and system designers read reviews for solid information on which to base 
decisions affecting their livelihoods. Vendors deserve an accurate appraisal of 
their products in terms that matter to their customers. 

A useful compiler review should, we think, assess completeness, correctness, 
adherence to standards, and use a widely-available suite of benchmarks ap- 
plied ina repeatable manner to measure all the major aspects of compile- and 
run-time performance. Publication of a review should constitute a commit- 
ment to continue to evaluate the product, and to publish updates and correc- 
tions when appropriate. And no review should be the work of a single individ- 
ual, no matter how knowledgable or above reproach. 

We’ve tried to provide such a useful review in this month’s evaluation of 13 
C compilers, done by over a dozen programmers using several dozen bench- 
marks, with several pairs of eyes reading the manuscript. But we don’t claim 
we brought it off flawlessly, and we'll be following up on this review with 
updates, corrections (if necessary), and comparable benchmark results for 
other compilers. 

For us, and we think for computer publications generally, this is new ground. 
we don’t believe that any computer magazine has been doing technical reviews 
the way they should be done, and that includes Dr. Dobb’s Journal. We hope to 
change that, and this issue’s C compiler review is one step in that direction. 

We plan to take some more steps in the direction of useful reviews in the 
coming months. One desirable feature that this month’s C compiler review 
lacks is a single benchmark test providing a real-world mix of functions; we're 
looking into some tests that purport to do this. We welcome your feedback and 


suggestions. 


Michael Swaine 
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THE MOST RADICAL 
ALGORITHM 
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ITS NOT 
HOW HARD YOU WORK. 
ITS HOW MUCH 
YOU GET DONE 


here's an odd contradiction 

built into most database 

software. Most of the fea- 

tures that make it powerful 
enough to do the job make it a real 
struggle to use. 

But at Microrim® we've never 
thought it makes sense to do things 
the hard way. That's why we're intro- 
ducing R:base™ 5000. With a brand 
new feature that lets you create pro- 
grams up to ten times faster. 






CLIENT DATABASE MENU 
_ 1.Addaclientmasterlist. 
2. Change a client master record. © 
5. Delete a client master record. | 
4. Printcllentreport: 
SO Maire 








PRODUCTIVITY: 
R:base 5000 vs. dBASE III 
Using R:base 5000 and dBASE III.™ 


we built this menu and linked it to its sub- 
routines. The resulting applications were 
equivalent. The effort required wasn't. 


Hee See se R:base 5000 | dBASE III 


* Your actual time may vary depending on skill level 


THE APPLICATION EXPRESS™ 
WHAT A DIFFERENCE. 
Since the Application Express 

automatically generates programming 

code, it can give you the tremendous 
advantage we've documented in the 









































attached chart. If you've never pro- 
grammed before, these automated 
steps can make all the difference 
between getting the job done and giving 
up completely. And if you're an experi- 
enced programmer, the Application 
Express can give you ten to one pro- 
ductivity gains. Of course, R:base 5000 
also gives you the powerful procedural 
language and report writer it takes to 
create highly customized applications. 


SEE FOR YOURSELF: 
1-800-547-4000. 

If you believe in common sense 
as much as we do, you won't take our 
word for it; you'll get your hands on 
a copy and make up your own mind. 
And that's just what we'd like you to 
do. For only $9.95 (plus shipping) we'll 
send you a mini-version of the product 
that lets you build real-life applications. 

Just call 1-800-547-4000 and ask 
for Dept. 991 . From Oregon, or out- 
side the US., call 1-503-684-3000, 
Dept. 991 . We'll send your copy right 
out. If you'd like to see R:base 5000 
today, head straight for a leading soft- 
ware store or computer dealer. If you - 
own R:base 4000, ask your dealer 
for a trade-up kit. 

We'll show you how easy it is to 
get a handle ssi 
on your work- 
load. When 
you ve gota 
progam that 
does things 
your way. 
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FROM MICRORIM 
IT ALL COMES DOWN TO COMMON SENSE. 


dBASE III is a trademark of Ashton-Tate. 





Tiny BASIC 

Dear Dr. Dobb's: 

I read with great interest the article 
“Tiny BASIC for the 68000,” which 
ran in the February 1985 issue of 
your magazine. I have been a long- 
time 68000 programmer and have 
written a full BASIC interpreter for 
the machine. But, dear Doctor, a 
68000 BASIC only about 10% faster 
than a Z80? I quickly got a copy of 
the source from the bulletin board 
and started probing. Mr. Brandly did 
a nice job of coding, but he missed a 
few tricks. It is relatively easy to doa 
substantial speed-up without increas- 
ing size significantly or changing any 
outward functionality. 

The main problem in this BASIC 
implementation is the TSTC subrou- 
tine. TSTC compares the current 
character against a test value and 
branches to a specified location if 
they do not match. TSTC gets used a 
lot in even simple statements; 10 
X = 1 (crIf) calls it 7 times. I count 98 
clocks for TSTC if the characters 
match, and 102 clocks if they do not 
match. Inline code to replace TSTC 
could be made a macro as follows: 


TSTC MACRO 
BSR IGNBLK 
CMPI.B #’&1',(AO) 
BNE &2 
ADDQ.L #1,A0 
ENDM 


which executes in 46 clocks (for 
match) and 40 clocks (no match). 
This gives a savings of 52 to 62 clocks 
per use of TSTC ... or almost 400 
clocks in a simple assignment state- 
ment. Any statement involving an ex- 
pression will see a similar (or greater) 
improvement. 

The second improvement also oc- 
curs in the expression evaluator routine 
EXPR. (This is where most improve- 
ments are to be found, since expression 


10 


evaluation is key to the interpreter’s 
performance.) EXPR uses the EXEC 
subroutine to check for relational oper- 
ators (=,<,>,<=,>=). EXECisa 
table-searching routine normally used 
to check for keywords. It includes a lot 
of overhead to check for shorthanded 
keywords that can never occur in rela- 
tionals. Also, the most usual case—no 
relational—requires searching the six 
possible relationals first before discov- 
ering the default condition. My sug- 
gested improvement treats relational 
operators as a special case, removing 
them from the EXEC tables and substi- 
tuting the code in Listing One (page 
16) for the EXEC call at the top of 
EXPR. Note that the default case (no 
relational) now takes only three com- 
pares. This is significant because it is 
used every time an expression (num- 
ber, variable, etc.) is encountered. 

The third improvement is found in 
the find-lines routines: (FNDLN, 
FNDLNP, FNDNXT, and FNDSKP.) 
These routines find heavy usage in 
GOTOs, GOSUBs, and IFs. The point 
here is that the original coding resets 
register A2 to the end of the program 
text for each line. This 24 clock over- 
head per line can be saved by a little 
re-ordering and a few extra bytes 
Listing Two, page 16.) 

My final improvements do not af- 
fect the execution speed of the inter- 
preter, but rather speed up program 
editing. The block-move subroutines 
MVUP and MVDOWN can be speed- 
ed up quite a bit at the cost of some 
additional code. I'll illustrate with 
MVUP. It is currently coded: 


MVUP CMPLAI,A3 
BEQ MVRET 
MOVE.B 

(A1)+,(A2)+ 
BRA MVUP 


* 


MVRET RTS 


This requires 36 clocks per byte 
moved. If one calculates the number 
of bytes to be moved outside the loop, 
a much tighter inner loop (22 clocks 
per byte) is possible (see Listing 
Three, page 17). The set-up overhead 
is 48 clocks, so it takes only 4 cycles 
through the inner loop to outweigh it. 
This version of MVUP can handle a 
maximum of 65,536 bytes (the origi- 
nal had no restriction), but this 
should not prove much of a problem 
in Tiny BASIC programs. 

A final note to the Doctor: please 
keep articles like this coming! There 
is nothing that improves the “breed” 
of programmers like quality exam- 
ples. Thank you. 

Sincerely yours, 
Robert D. Grappel 
28 Buckmaster Drive 
Concord, MA 01742 


Ellipses 

Déear-DDs, 

Many thanks to Tom Hogan for his 
excellent derivation of the DV (deci- 
sion variable) method for plotting el- 
lipses. His explanation of this poten- 
tially confusing subject is very clear. 
This general approach, sometimes 
called ‘displacement comparison’ ap- 
pears elsewhere in the literature, but 
this is the first time I have seen it ap- 
plied to ellipses. 

I would like to point out a minor 
error in the derivation, and then show 
how the full potential of the method 
can be achieved by one more refine- 
ment that eliminates all multiplica- 
tion within the loops. 

The error is in Equation 10. If the 
x-axis is the major axis, the initial. 
point is at 


Equation 10 is correct if the first 
term is changed to reflect this. The 
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The Ultimate Programmer’s Editor 


WENDIN’S > 


SUPER PROGRAMMERS edit in XTC to make software 
development a snap! Just look at these powerful 
features: 





All DOS compilers and utilities can be executed from 
within XTC using a single keystroke. While it runs, 
XTC captures your compiler’s output and redirects 
it into your text, sO you can compare compiler 
messages with your source code ON THE SAME 
SCREEN. And using XTC’s macro language, Turbo 
Pascal is literally only a keystroke away. You can 
use other compilers and utilities inside XTC too — 
like Lattice ‘‘C,’’ Microsoft Pascal, and IBM’s Basic, 
to name a few. 


XTC has the most powerful macro language in the 
editing world. XTC’s macros aren’t just keystrokes 
assigned to keys; they’re real programs that can be 
used to automatically edit source code and data 
files. Like any real programming language, XTC has 
control structures like IF THEN ELSE, WHILE DO, 
REPEAT UNTIL, FOR NEXT, DUPLICATE N 
TIMES, INDEFINITE LOOP, EXIT, and BREAK 
LOOP. XTC also has INTEGER, BOOLEAN, and 
STRING variables to hold numbers, conditions, and 
pieces of text. 


With XTC you can display up to 8 different files or 
parts of the same file on the screen at once. XTC’s 
windows are programmable and can even be linked 
together to share files. XTC also has 20 other buffers 
that you can use to hold files and blocks of text. 


If you already know Wordstar commands, then you 
don't need to learn a new set of commands. If you 
want to customize XTC, just write macros to emulate 
the key layout you’re used to. XTC can also read 
Wordstar files, and can even strip off all of the non- 
standard high bits with a single command. 


XTC lets you edit files entirely in memory (using all 
available memory), or paged to disk, for maximum 
flexibility. You can choose how XTC buffers text. 


e UNDO N TIMES 
¢ REMOVE WORDSTAR HIGH 


e EDIT GRAPHICS DISPLAYS 
e AUTOINDENTING MODE 


XTC comes with 7,000 lines of source code jam- 
packed onto two DSDD disks. Includes 13 modules 
written in Pascal, and 2 assembly libraries you can 
use to access the PC’s screen, intercept software 
interrupts (like INT 21H functions), allocate and 
deallocate memory, and load and execute pro- 
grams. It’s all included FREE for your recreation and 
enjoyment! 
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XTC’s built-in multitasking lets you run your macros in the foreground 
or independently in the background while you continue editing. A back- 

ground process has full access to editor resources, and can be used to 

translate code from one language to another in REAL TIME, print files in the back- 

ground, or even scan syntax while you type in code. Best of all, you can use XTC to edit source 
and documentation in any programming language! 


¢ TAB EXPANSION/ 
COMPRESSION MODE 

BITS e EXTRA LONG LINES 

e MACRO COMPILER 

e TELEPHONE SUPPORT 











XTC outperforms any other program- 
mable editor on all IBM/PC, /XT, and 
/AT computers (and true com- 
patibles). If you want to feel the 
power of XTC before you buy it, just 
ask for our demo disk (only $10) and 
try it out. When you buy XTC, we'll 
knock 10 bucks off the price. 


To get your copy of XTC now, order 
it over the phone — we can ship it 
the same day you call! Or, send in 
an order, just like this one: 


Macro Compiler 


Shipping, Handling, 
Insurance 


TOTAL IT UP, AND SEND IT QUICK! 





¢ 150 PAGES OF 
DOCUMENTATION 

e RUNS ON IBM / PC, XT, AND 
/ AT COMPUTERS (AND 
TRUE COMPATIBLES) 






BOX 266 
CHENEY, WA 99004 


The people who make 
quality software tools 
affordable. 


Ada® is a registered trademark of the U.S. Department of Defense. Turbo Pascal is a trademark of Borland, Inc. XTC is a trademark of Wendin, Inc. 


Circle no. 112 on reader service card. 





For everyone who ever tried 
doing five things at once 


The perfect computer program 
for someone as busy as you. 

It lets you keep several other 
programs working at once. 


Do you ever go in so many directions 
so fast not even a computer can keep up 
with you? 

Well, now an IBM Personal Comput- 
er can —thanks to IBM ‘TopView. 


TopView is a new kind of software 
that lets you switch between other pro- 
grams as quickly as you can change your 
mind, even run several programs at the 
same time. 

Once you load ‘TopView into your 
computer, you load the other programs 
you use most—as many as your com- 
puter’s memory will permit. 

After that. the greatest distance 
between two programs is just a couple of 


keystrokes, or (optional) mouse moves. 

There’s no waiting and a lot less 
diskette swapping. 

But when you're really busy is when 
TopView really shines, letting you do 
many jobs simultaneously. 

For example, you can print a letter, 
while you search a file, while you analyze 
a spreadsheet, while your clock/calen- 
dar reminds you that your automatic 
dialer is about to place a call for you. 


Little Tramp character licensed by Bubbles Inc., s.a. 





..L BM presents lopView. 


And you can see everything through 
on-screen “windows” and control it all 
with easy-to-use pop-up menus. 

You can-even make unrelated pro- 
grams work together; say a “Brand Y” 
spreadsheet with a “Brand Z” word pro- 
cessor. 

But simplest of all is a certain 
“Brand IBM”, namely the IBM Assistant 
Series—for filing, writing, planning, 
reporting and graphing. 


*|BM Product Center price. 


a 


Many other popular programs also 
work with TopView, and the number is 
growing. 

Naturally, the more computer 
memory you have, the more ‘TopView can 
help you. At least 512K is recommended. 

And the price is only $149% 

Beyond that, all you need is to be the 
kind of person who never does a single 
thing all day, but who wants to do every- 
thing, at once. 


Circle no. 68 on reader service card. 


To learn more, call an IBM market- 
ing representative, or visit an IBM Prod- 
uct Center or Authorized IBM PC or 
Software Dealer. 

For the store nearest you, and a free 
brochure, call 800-447-4700. (In Alaska 
and Hawaii, 800-447-0890.) 


Personal Computer Software 
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situation is clarified if one considers a 
different form of the equation of the 
ellipse: 


x2 + y2 = | 
a2? 


where a and b are the radii along the 
x the y axes, respectively. 

If we let a = a? and B = b?, then 
Mr. Hogan’s Equation | is equiva- 
lent. It is clear that the aspect ratio is 
b/a, and Mr. Hogan’s use of the as- 
pect ratio is consistent, except for 
equation 10. If the x-axis is the major 
axis, then R,, = a, and the initial 
point is at b, which is given by Ry, X 
aspect ratio, or Rm X (b/a). (We are 
assuming that the center of the el- 
lipse is at (0, 0) ). This is a fairly ob- 
vious error, but it could confuse the 
unwary (me, for example). The state- 
ment in the program which initializes 
d is correct, so I assume Mr. Hogan 
found the error and simply over- 
looked this one instance. 





The Datalight C Compiler 
for MSDOS is a full C with 
all K&R Constructs, 
including bitfields, 

plus the version 7 
extensions. Other features 
Of the compiler are: 


linker is required. 


aFloating point performed with 8087 or 


automatic software floating. 


DATALIGHT C 


= Produces object files (.obj) so just the4viSDOS 


Much more interesting is an ex- 
amination of the operations that are 
performed within the loops for com- 
puting successive dot locations. An 
example is the computation of ‘d’ at 
the end of the first loop 


(d += two_beta * 
(3. (rel x == LY) 


Note that every term in the computa- 
tion is a constant except for rel_x, 
and further, that rel_x is increment- 
ed by exactly one every time the loop 
is executed. So let’s rewrite that line 
for clarity: 


(d+ = two_beta*3 + 
two_beta*rel_x*2) 


or in human rather than computer 
math 


(d += 66 + 4(xrel) 


Now we will cleverly initialize our 







oy AW a me — i ' 


C-PROGRANIMERS 


All products are written entirely in K& RC. Source 
code included, No Royalties, Powerful & Portable. _ 


Eye eel AN 


High speed random and sequential access. 
© Multiple keys per data file with up to 16 million rec 
~e~Duplicate keys, variabletength data records: gerne: 





#Over 100 compact library functions with source. 


added variable d_norm to 28 before 
entering the loop, so every pass we add 
48 to d_norm before adding it, in 
turn, to the former value of d. 

All of the multiplication operations 
within the loops can be replaced by 
additions in a similar way, as demon- 
strated in Listing Four (page 18) (we 
use x, y in place of rel__x, rel_y to de- 
note the local coordinates relative to 
the center of the ellipse, and we don’t 
bother to maintain the global coordi- 
nates row and col, but the result is the 
same). 

I will be happy to discuss this with 
anyone who wants to call me at (206) 
226-3916, or via [IEEE COMPMAIL— 
user name eric.therkelsen. 

Again, many thanks to Mr. Hogan 
for a derivation that is a significant 
contribution to the literature. 

Sincerely, 

Eric E. Therkelsen 
ETTS, Incorporated 
19224 Southeast 164th 
Renton, WA 98058 
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. Greatly speeds application development. 










=Compatible with the Lattice C compiler. 

m#Runs On IBM-PC, and compatibles, running 
MSDOS 2.0 or later. 

=sComplete, easy-to-read users’ manual with index. 

Highly optimized code for production quality 
programs. 


Datalight 


11557 8th Ave. N.E. 
seattle, Washington 98125 
(206) 367-1803 


ming language. : : 
oom ®... SUppOrts Multi key. files and dynamic. index definition. 
: » Very easy to use. : 


® Patterned after the UNIX utility. 
° Works for programs written in every language. 
° Full macros, File name expansion and built in rules. 


Full Documentation and Example Programs Included. a 









1348 Suabay ke 
Oakville, Ontario, Canada 
(416) 825-0903 
(41GB 44-2610 oie senimemmend meee 


Dealer inquiries invited. - 


For more information call or write: 


SOMmOCUS 


Credit cards accepted. 


Outside USA add $10 shipping. Washington State resi 0 
tax. VISA and MasterCard accepted e residents add'7.9% sales 


IBM-PC, a trademark of IBM; MSDOS. at i : i 
G, a trademark of Latics Gare , a trademark of Microsoft Corp.; Lattice 


Circle no. 29 on reader i i | 
er service card. Circle no. 126 on reader service card. 
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Tools That Make Your Job Easier 


For PCDOS/MSDOS (2.0 and above/128K ) @ IBM PC/Compatibles, PC Jr., Tandy 1000/1200/2000, & others 
For CPM80 2.2/3.0 (Z80 trequited/64K ) @ 8” SSSD, Kaypro 2/4, Osborne I SD/DD, Apple II, & others 


Great For All Languages 


A general purpose text 
processor, the MIX Editor is 
packed with features that make 
it useful with any language. It 
has auto indent for structured 
languages like Pascal or C. It has 
automatic line numbering for 
BASIC (255 character lines). It 
even has fill and justify for 
English. 


Split Screen 


You can split the screen 
horizontally or vertically and 
edit two files simultaneously. 


Custom Key Layouts 


Commands are mapped to keys 
just like WordStar. If you don’t 
like the WordStar layout, it’s 
easy to change it. Any key can be 
mapped to any command. You 
can also define a key to generate 
a string of characters, great for 
entering keywords. 


Macro Commands 


The MIX Editor allows a 
sequence of commands to be 
executed with a single 
keystroke. You can define a 
complete editing operation and 
perform it at the touch of a key. 


Custom Setup Files 


Custom keyboard layouts and 
macro commands can be saved 
in setup files. You can create a 
different setup file for each 
language you use. 


MSDOS Features 


Execute any DOS command or 
run another program from 
inside the editor. You can even 
enter DOS and then return to 
the editor by typing exit. 


Complete & Standard 


MIX C is a complete and 
standard implementation of C 
as defined by Kernighan and 
Ritchie. Coupled with a Unix 
compatible function library, it 
greatly enhances your ability to 
write portable programs. 


The Best C Manual 


MIX C is complemented by a 
400 page manual that includes 
a tutorial. It explains all the 
various features of the C 
language. You may find it more 
helpful than many of the books 
written about C. 


Fast Development 


MIX C includes a fast single 
pass compiler and an equally 
fast linker. Both are executed 
with a simple one line 
command. Together they make 
program development a quick 
and easy process. 


Fast Execution 


The programs developed with 
MIX C are fast. For example, 
the often quoted prime 
number benchmark executes 
in a very respectable 17 
seconds on a standard IBM PC. 


Standard Functions 


In addition to the functions 
described by K&R, MIX C 
includes the more exotic 
functions like setjmp and 
longjmp. Source code is also 
included. 


Special Functions 


MIX C provides access to your 
machine’s specific features 
through BDOS and BIOS 
functions. The CHAIN function 
lets you chain from one 
program to another. The 
MSDOS version even has one 
function that executes any DOS 
command string while another 
executes programs and returns. 


Language Features 


@ Data Types: char, short, int, 
unsigned, long, float, double 
(MSDOS version performs 

BCD arithmetic on float and 
double-no roundoff errors ) 

@ Data Classes: auto, static, 
extern, register 

® Struct, Union, Bit Fields 
(struct assignment 

supported ) 

@ Typedef, Initialization 

@ All operators and macro 
commands are supported 








NEW FEATURES 


(Free update for our early customers!) 

e Edit & Load multiple memory 
resident files. 

e Complete 8087 assembler 
mnemonics. 

e High level 8087 support. 


Full range transcendentals 
(tan, Sin, cos, arctan, 
logs and exponentials) 


Data type conversion and 
[/O formatting. 

e High level interrupt Support. 
Execute Forth words from with- 
in machine code primitives. 

e 80186 Assembler extensions for 
Tandy 2000, etc. 

e Video/Graphics interface for 

Data General Desktop Model 10 


FORTH 


e Fully Optimized & Tested for: 









IBM-PC IBM-XT IBM-JR 
COMPAQ EAGLE-PC-2 
TANDY 2000 CORONA 


LEADING EDGE 


(Identical version runs on almost all 
MSDOS compatibles!) 


e Graphics & Text 
(including windowed scrolling) 


e Music - foreground and 
background 
includes multi-tasking example 
e Includes Forth-79 and Forth-83 
e File and/or Screen interfaces 
e Segment Management Support 
e Full megabyte - programs or 
data 


¢ Complete Assembler 
(interactive, easy to use & learn) 


e Compare 

BYTE Sieve Benchmark jan 83 
HS/FORTH 47sec BASIC 2000 sec 
w/AUTO-OPT 9sec Assembler 5 sec 
other Forths (mostly 64k) 70-140 sec 

FASTEST FORTH SYSTEM 

AVAILABLE. 
TWICE AS FAST AS OTHER 
FULL MEGABYTE FORTHS! 


(TEN TIMES FASTER WHEN USING AUTO-OPT!) 


HS/FORTH, complete system only: $250. 


Mastercard ed 
Add $10. shipping and handling 


HARVARD 
SOFTWORKS 


PO Box 69 
Springboro, Ohio 45066 
(513) 748-0390 
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Prolog 

Sirs: 

I enjoyed your March, 1985, issue on 
Prolog, but thought I should write to 
warn your other readers of possible 
support problems with Programming 
Logic Systems, Inc., the U.S. mar- 
keters of MicroPROLOG. Over the 
past 5 months I have attempted, with 
no success whatsoever, to obtain the 
simple information whether there 
have been any changes or upgrades to 
the software in the year or so since I 
purchased it. Neither the U.S. or 
British offices will respond to repeat- 
ed mail inquires (the British office 
simply sent a brochure, in no way an- 


Letters 
Listing One 
BSR IGNBLK 


MOVE.B (AG)+,D2 
CMPI.B #’=’ ,D2 


BEQ XP15 

* 
CMPI.B #°>’,D2 
BNE XXP1 

* 
CMPI.B #’=",(AQ) 
BNE XP13 

* 
ADDQ.L #1,A0 
BRA XP11 

* 

XXP1 CMPI.E #°<* ,D2 
BEQ xxP2 

* 
SUBQ.L #1,A0 
BRA XP17 

* 

XXP2 CMPI.B #°=’,(AQ) 
BNE XxP3 

* 
ADDG.L #1,A0 
BRA XP14 

* 

XXP3 CMPI.B #°>’, (AQ) 
BNE XP16 

* 


ADDU.L #1,A0 
BRA XP12 


Listing Two 


FNDLN CMPI.L #8FFFF ,D1 
BCC QHOW 
MOVE.L TXTBGN,A1 
MOVE.L TXTUNF ,A2 
SUBQ.L #1,Az 

* 

FNDLNP CMPA.L Al ,A2 
BCS FNDRET 

* 


MOVE.B (A1),D2 
LSL.L #8,D2 
MOVE.B 1(A1),D2 
CMP D1,D2 

BCC FNDRET 


(Text begins on page 10) 


swering my very simple question). If 
these people can’t respond to a ques- 
tion as simple as that, it does not bode 
well for their willingness to respond 
to substantive inquiries, and suggests 
to me that one of the other fine imple- 
mentations of the language would be 
a better choice. 

Sincerely, 

George Carey 

2048 Winding Creek Ln. 

Marietta, GA 30064 


DDJ 


skip blanks 

get first char. 
equals? 

YES, process it 


0, process > 


skip past = 
process >= 


eo he Ore Se 
yes 


no, default case 
handle default 


C=? 

no 

yes, skip past = 
process <= 


<2? 
no, process <¢ 


t 
<> End Listing One 


note change 


note change 
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* 


Fi ADDQ.L #2,Al1 note change te 
F2 CMPI.B #CR,(A1)+ 
BNE F2 
* 
BRA FNDLNP 
* 
FNDNXT MOVE.L TXTUNF ,A2 note change 
SUBQ.L #1,A2 
BRA Fil 
* 
FNDSKP MOQVE.L TXTUNF ,A2 note change 
SUBQ.L #1,A2 : ae Apple® | 
BRA F2 End Listing Two 
Fixed point speed can rival that of float- 
ae Fan ing point hardware. But the details have 
Listing Three been a well kept secret—until now. The 
following graphs were generated by fixed 
MVUP MQVE.L DO,-(SP) preserve DO point examples from the ISYS FORTH 
MOVE.L A3,D0 eae) Ee 3 
SUB.L A1,DO compute no. of bytes 
BLE MVRET no bytes? 
* 
SUBQO.L #1,D0 adjust for DBRA 
* 
MVe MOVE.B €A1)+,(A2Z)+ 
DBRA DO ,MV2 
* 
MYRET MOVE .L. -CSP)+,06 restore DQ 


RTS End Listing Three 
(Listing Four begins on next page) 


Parallel Resonance with Damping 
BASIC 213 sec ISYS FORTH 27 sec 








pc 





ishere! 


Complete TEX82 Typesetting for your PC/XT or AT 






e Real, state-of-the-art typesetting capable of handling all 
mathematical and scientific material. 
e Produce work of this quality on your Epson printer. 






k a's i b's Hydrogen 3p Orbital Cross-section 
ee ti BASIC 492 sec ISYS FORTH 39 sec 
» ) f(p) = i. f(t) dx(t). firs 5 <5 ti - . e 
p prime re ee ge 





Fast native code compilation. Sieve 
benchmark: 33 sec 

Floating Point—single precision with 
trancendentals 

Graphics—turtle & cartesian with 70- 
column character set 

Double Precision including D*/ 

DOS 3.3 Files read & written 
FORTH-83 with standard blocks 
Full-Screen Editor 

Formatter for word processing 

Macro Assembler 

Price: $99, no extra charges 


k+1 elements 
e Outperform professional typesetters with work of this quality 


from a QMS Lasergrafix. 


> G(z) = Ol) = exp( > * Sp2* ) = TT esi*/ 


k>1 k>1 
e PCTEX includes INITEX, LaTEX macro package and manual, 
PCTEX macro package and manual. 
e PCTRX is a full implementation of Donald Knuth’s TeX and 
produces standard .DVI files. 
e PCTEX: only $279. PCDOT dot-matrix printer driver (includes 
over 200 fonts): $100. (For IBM Graphics printer, Epson RX FX 


printers, Toshiba 134x 135x.) QMS Lasergrafix driver: $200. 


Include $3. shipping for each order. Calif. residents add sales tax. MasterCard, Visa accepted. 
Requires DOS 2.0 or better, 512K RAM, 10M hard disk. 
















ILLYES SYSTEMS 
On {art eC 







PERSONAL ; Champaign, |L 61820 
20 Sunnyside, Suite H, Mill Valley, CA 94941. Cee 
415) 388-8853. Telex 275611. pipet iba dese ga 
INC u 5) 38 Sathematial Society. PCTpX: Personal TeX, Inc.. IBM-PC: IBM Corp.. QMS: QMS. Inc va 7/359-6039, hectare ht 






For any Apple ][ model, 48K or larger. 
Apple is a registered trademark of Apple 
Circle no. 76 on reader service card. Computer. 
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68000 
CO-PROCESSING 
For 

IBM PC, PC/XT 
and 
COMPATIBLE 
SYSTEMS 






Now you can add the MOTOROLA 68000 
16/32 Bit Processor to your PC via use of 
the Pro 68 Advanced Technology Co- 
Processor. Enjoy all of the performance 
benefits of the 68000 processor without 
sacrificing your current PC system. Con- 
sider these impressive standard features 
of Pro 68: 


e High Speed MOTOROLA 68000 micro 
processor 
e 10Mhz no wait state design (3 times 
faster than the IBM PC/AT) 
e True 16/32 bit technology 
e For use on IBM PC, PC/XT or compati- 
ble systems 
e On board 16 bit parity checked memory, 
256K to 1024K 
e Two serial |/O ports for multi user 
interface 
e Provisions for the high speed NS32081 
math processor 
e High speed proprietary dual port host 
bus interface 
e Parallel or array processing via multi 
processor architecture 
MS/PC DOS RAM disk driver program 
e Choice of two popular integrated 16/32 
bit operating systems: 
— CPMé68K from Digital Research Inc. 
— Full suite of development tools 
— ‘‘C’’ compiler with floats and 
UNIX I/O library 
— Many third party compatible 
languages and applications 
— OS9/6800 from MICROWARE 
Corporation 
— UNIX look alike with multi user/ 
multi tasking, shell, hierarchical 
disk directory, record and file 
lock, pipes and filters 
— Full suite of development tools 
— UNIX V compatible ‘‘C’’ compiler 
— Optional languages include 
BASIC, ISO PASCAL, FORTRAN 
Bl 
Pricing from $1195 includes Pro68 with 
256K, OS, and MS/PC DOS RAM disk 
driver. HSC also manufactures and mar- 
kets a full line of co-processors and 
RAM disks for use on Z80 based systems. 


DISTRIBUTORS: 


Australia-Computer Transition Systems 
. .03-537-2768 
Great Britain-System Science 
. . .01-248-;062 
West Germany-DSC International 
. . .089-723-1125 





















































Canada Remote Systems 
. .416-239-2835 


Dealer, Distributor and OEM inquiries 
invited. 






| ee 
ese Some te] —_] 


267 North Main Street 
Herkimer, NY 13350 
(315) 866-7125 
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le f f CTS (Listing continued, text begins on page 10) 
Listing Four 


ellipse_write ( xc, yc, a, aspect ) 


PRE ORE, ENE, O; 
/» xc, ye are coords of center; 
/* we chose to input a rather than Rm «/ 


Float aspect; 


long alpha, beta; 
long four_alpha, four_beta, alpha_y, beta_x, d, d_exc, 
int b, Rm; /* bis “radius along y-axis “e/ 

js since a is not necessarily the major radius, 


d_norm; 


tht?) *% 3 /* local coords relative to center of ellipse 


[ initialization similar to Mr. Hogan's ] 


alpha_y = alpha * y; 
beta_x = OL; 

d_exc = - four_alpha * y; 
d_norm = beta << 1; 


d = 2*alpha*(y*(y-1)) + alpha + 2 * (beta - beta*Rm - alpha*beta); 
/* This is Mr. Hogan's original statement - it is correct 
even though equation 10 is not. */ 


while ( alpha_y > beta_x ) 


put dots P BOe WE we he 
if idler ) 
{ a exception condition - decrement y occasionally 
d += ( d_exc += four_alpha ); 
alpha_y -= alpha; 
nos 
d += ( d_norm += four_beta ) ; /* 


beta_x += beta; 
A t's 


} 


/* slope is now < -1, so proceed with rest of ellipse « / 


[ 'nuff said? ] 


/* new vbls to avoid multiplication in loop.. 


always increment x x / 


a is radius along x-axis #/ 


we will compute Rm */ 


«/ 


ae 


* / 


End Listings 
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No source code for 
your REL files? 


REL/MAC 


converts a REL file in the Microsoft™ 
M80 format to an 8080 or ZILOG™ Z80 
source code MAC file with insertion of all 
public and external symbols. 
@ REL/MAC makes MAC source files 
@ REL/MOD lists library modules 
e@ REL/VUE displays the bit stream 
@ REL/PAK includes all of the above 
e@ 8080 REL/MAC demo disk $10.00 
REL/PAK for 8080 only 
REL/PAK for Z80 & 8080............. $134.95 
on 8”SSSD disk for CP’M'” 2.2 


Send check, VISA, MC or C.O.D. to 


TYPE 
5"-SS/DD-48 TP 
5"-DS/DD-48 TP 
5"-SS/DD-96 TP 
5-DS/DD-96 TP 
5"-DS/DD-IBM/AT 


19.50 
25.50 
29.50 
37.50 
52.95 
23.95 
25.50 
8°-DS/DD-48 TPI 29.95 
3.5°-SS/DS 32.95 


Available Soft or Hard Sector 
For Plastic Case Add 1.25/Box 
Plus Tax & Shipping 
- Cash, Visa, Mastercard, COD - 
Integral Systems Corp. 
2900-H Longmire Drive 
College Station, TX 77840 
(409) 764-8017 


8'-SS/SD-48 TPI 
8°-SS/DD-48 TPI 





COMPUTER TECHNOLOGY 


PO. BOX 1473 ELKHART, IN 46915 
1-800-622-4070 
(Illinois only 1-800-942-7317) 
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Another in a series of 
productivity notes on MS-DOS™ 
software from UniPress. 


Subject: Multi-window fuil 
screen editor. 


Multiple windows allow several files 
(or portions of the same file) to be 
edited simultaneously. Program- 
mable through macros and the built- 
in compiled MLISP™ extension 
language. 


Subject: Compiler for MS-DOS. 


Lattice C Compiler is regarded as 
the finest compiler for MS-DOS and 
is. running on thousands of 8086 
systems. 


Subject: Powerful Keyed File 
Access for MS-DOS. 


PHACT ISAM is a keyed B + tree 
file manager providing easy access 
to and manipulation of records in 

a database. 


Trademarks of Lattice, Lattice. Inc UniPress EMACS and MLISP. UniPress 
Software. Inc. MS DOS. Microsolt, UNIX, AT&T Bell Laboratories, Carousel Tools 
Carousel MicroTools, inc, PHACT. PHACT Associates, 8086, Intel, TI-PC, Texas 
Instruments, BM-PC/AT. International Business Machines, DEC Rainbow/VMS 
Digital Equipment Corp 


————— 


Features: 


@ Famed Gosling Version. 

@ Extensible through the built-in 
MLISP programming language and 
macros. 

@ Dozens of source code MLISP 
functions; including C, Pascal and 
MLISP syntax checking. 

@ EMACS runs onTI-PC™ IBM-PC AT™ 
DEC Rainbow™ or any other MS-DOS 
machine. Requires at least 384k. 
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DR. DOBB'S CLINIC 





by D. E. Cortes! 


DRI Generic Sales Again 
Barry Watzman writes to contradict 
us regarding Digital Research’s poli- 
cy on selling generic operating sys- 
tems. He claims that DRI is “not only 
not selling generic systems any long- 
er, they are no longer licensing value- 
added vendors either. The new rule is, 
if you’re not the manufacturer of the 
computer on which the implementa- 
tion will run, forget it.” 

By way of proof, he sent along a 
photostat of a letter to him from Al- 
ice Clark, Contract Administrator at 
DRI. It includes the sentence: “*We 
are not currently licensing companies 
to modify and redistribute our soft- 
ware unaccompanied by hardware or 
an application program.” 

The dispute seems to be over how 
much and what kind of value a “val- 
ue-added” vendor must add to be ac- 
ceptable. Watzman wants to make a 
business of configuring DRI systems 
to Zenith hardware (he does it very 
well from all we hear). DRI’s posi- 
tion, he says, prevents it. 


What Z800? 


Roger Smith was turning over back 
issues Of DDJ when his eye was 
caught by the confident words of L. 
Barker in this column for November 
1981. ““When the Z800 comes out 
next year,” Barker averred, “‘with the 
Z80 instruction set and multiply and 
divide, this [worrying about the speed 
of arithmetic] will look like a waste of 
time.” 

That pin-compatible Z80 super- 
chip never appeared, so far as we 
know. “‘Does anybody know what 
happened?” Smith wonders, and so 
do we. 


Nesting MSDOS 

Remember how we finally got CP/M 
batch command processing pretty 
well fixed up? If you don’t, you might 
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like to refer to these old Clinics: 


June 1982 for PAUSE and BEEP 
commands 

August 1982 for null-line, lower- 
case, and control character fixes 

September 1982 for the QUITIF 
program 

October 1982 for nested submits 

January 1984 for a PAUSE that 
works in CP/M Plus 


You might think that batch execu- 
tion in MSDOS Version 2 wouldn’t 
need our help, but you’d be wrong: 
MSDOS won’t nest batch files. When 
you invoke a batch file in a batch file, 
the called file replaces its caller in- 
stead of being its subroutine. 

We just discovered how to do it. 
You nest batch files by nesting com- 
mand shells. Command.com, the 
shell, can be named as a command. If 
given a /c switch, it executes the sin- 
gle command that follows on the com- 
mand line and ends. If that command 
is a batch file, it will be executed in 
full, and control will return to the call- 
ing batch file. Type in our demo file, 
recurse.bat (Listing One, page 24), 
and try it out with a line like 


recurse 0 1 23 45 


What’s nice is that each level of 
command.com has its own environ- 
ment. The nested batch file can do all 
the sets and paths it likes; on exit, the 
prior environment is restored. Add a 
chkdsk command to the end of the 
file to see how much space each nest- 
ing level takes up. 


Random Error 

In February, we published a quasi- 
random number generator (QRNG) 
credited to persons named Talley and 
Metropolis (about whom we know 
nothing more). Ever since then, we’ve 


been backing away from it, but we 
have the subject more or less under 
control now, mostly thanks to David 
Ross and Michael Barr. 

We showed the QRNG in C. It had 
two main parts. The first, randO( ), 
purported to produce quasi-random 
numbers uniformly distributed be- 
tween zero and MAX. Take that at 
face value; we'll come back to it. 

The second part, randi(w), used the 
first to produce what purported to be 
quasi-random numbers uniformly 
distributed between | and uw. It did 
not. Here’s the essence of how we 
coded it: 


randi(u) 
unsigned u; 


} 


The percent sign is the C sign for 
modulus. Can you see what’s wrong 
with this? 

Michael Barr and Peter K. Pearson 
did. Barr put it best: “Imagine you 
adopted the following method to find 
random digits from 0 to 9: throw a 
dart at the face of a clock and take the 
low-order digit of the number nearest 
to where the dart hits. It is evident 
that you will get the digits | and 2 one 
time in six and the other digits once in 
twelve. Thus a random event is trans- 
lated into one that is still random, but 
not uniformly distributed. [ Your pro- 
cedure randi(u)] does that. It shows 
up most clearly when uw is a sizable 
fraction, say 2/3, of MAX. In that 
case, you will get approximately twice 
as many values between 0 and u /2 as 
between u /2 and u.” 

We devised randi( ) with the vague 
mental image of how the mod func- 
tion folds the real number line, like 
a carpenter's rule, into a heap of u - 
sized segments. And so it does, but 


return(1 + randO( ) % u); 
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the short last piece improperly en- 
riches the low end of the range. What 
randi( ) really wants to do is to re- 
scale the range 1... MAX to fit in 
the interval 1...u. Rescaling calls 
for, not mod, but division, like this: 


randi(u) 
unsigned u; 


return(1 + randO( )*u/MAX),; 


But there are problems implementing 
that. The main charm of these rou- 
tines was that they worked with 16- 
bit integers. The expression u /MAX 
is a fraction; if we do randO(_ )*vw first, 
its result will exceed 16 bits. 

Now, rand0( ) makes use of two 
constants: MAXO and MAX. MAX0O is 
usually 2W, while MAX = MAX0-1. 
In our original version, w was 15, but 
clearly it should be the word size of 
the computer, usually 16. Supposing 
that to be the case, the expression 


rand0( )*u/MAX0O 


can be implemented cheaply enough 
by doing a 16-bit unsigned multiply 
and taking the most significant 16 bits 
of the 32-bit result. Picture it as using 
multiplication by u to squeeze out 
some of the high-order bits of 
rand0( ). 

The right scaling factor is u/MAX 
not u/MAX0. But David Ross says 
that “‘to adjust xu/MAX0 to make 
it equal xu /MAX, just add one when- 
ever xu/(MAX0*MAX) is greater 
than 0.5, 7.e. when 2xu exceeds 
MAX0* MAX.” 

All these binary manipulations 
make it impractical to present the re- 
vised randO( ) and randi( ) in any 
language but assembly language. 
Versions for the 8086 and Z80 fol- 
low. If we had versions for the 6xxxx 
machines, we'd print ’em and will if 
you send us some. 


Considering OQRNGs 

The strongest impression we’ve 
gained from this exercise in QRNGs 
is of our own ignorance. A /ot is 
known about the design of QRNGs, 
and most of it is strongly mathemati- 
cal. The best source we know is Don- 
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ald Knuth’s Seminumerical Algo- 
rithms, pages 1-178. There oughta 
be a law that nobody can write about 
QRNGs until they pass a midterm on 
this material—in which case, this col- 
umn would be on another topic even 
though we spent several hours recent- 
ly poring over that chapter. 

We learned quite a bit about linear 
congruential QRNGs, but the Talley- 
Metropolis routine is not one of those. 
Mathematically, it can be stated as: 


An ={ 
(( Xn} + Xn.2) mod MAX0O) 
* 2) mod MAX 
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which is not identical to any of the 
QRNG formulae Knuth treats (al- 
though it bears an uncomfortable re- 
semblance to the Fibonacci sequence, 
whose output Knuth says “‘is definite- 
ly not random’). 

We also learned that you should 
never base an application on a QRNG 
that hasn’t been formally justified 
and thoroughly tested. Therefore you 
shouldn’t rely on this one. We publish 
it because readers might enjoy work- 
ing on it, as opposed to with it. 

We also learned a lot about testing 
QRNGs; Knuth is particularly good 
on that subject. In particular, we 
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know that you can spend about as 
much time as you like coding, run- 
ning, and analyzing tests. The time 
we could spend on this project was 
severely limited. But here are what 
we and our correspondents have 
learned. 


Period Length 

A major point of interest is the length 
of the sequence of numbers the 
QRNG will produce. Michael Barr’s 
approach to this was interesting and 
could be the basis of more extensive 
theoretical and practical work. “You 
can think of it as tracing an orbit 
among the sets of pairs of numbers 
(a,b) with a and b in the range 
O...MAX. And you can ask the 
question, what is the length and na- 
ture of that orbit? 
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fast as its closet competitor 
(benchmark for this test was the 
Sieve of Eratosthenes). 


“I recommend both the 
and the implementation 
by BDS ke highly.” 
Tim Pugh, Jr. 
in Infoworld 
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“Clearly, (0,0) is an orbit of its 
own. In particular, the generator can 
never produce two zeroes in a row 
[really? DEC |. This is, by itself, a 
failure of randomness, perhaps not a 
serious one, but nonetheless a failure. 

‘“‘When I tried it with MAXO = 8, 
I discovered that the other 63 pairs 
were all in one orbit! This was sur- 
prising, but when I tried out other 
values of MAXO (all even) I found 
that this is a fluke. For no other small 
value of MAXO do all the nonzero 
pairs make up a single orbit. For ex- 
ample, for MAX0O = 6, there is an or- 
bit of length 14, one of 16, and two of 
length 1—(0,0) as always and (4,4). 
As a matter of fact, if MAX0O is divisi- 
ble by 6, there is always that second 
fixed point.”’ 

We'd been operating under the as- 
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sumption that a generator that pro- 
duced 16-bit numbers would have a 
maximum period of 65,536, but that 
proved not to be the case. We hacked 
together a version of what Knuth 
calls the collision test. This program 
cleared 64K bits (8K bytes) then 
called RandO 256 times and set the 
selected bits to one. Then it began 
getting and counting Rand0 values 
and testing the bits they indexed. It 
counted successive hits of 1-bits. 

We had presumed that, if the 
QRNG were working right, it would 
generate 64K numbers and then start 
repeating, hitting all 256 1-bits in a 
row; or it might hit them all again 
sooner, indicating a short sequence 
from the original seeds; or it might 
get into a loop hitting 0-bits and nev- 
er return to the original 256 numbers. 

Nothing of the sort happened. It 
behaved instead like a well-distribut- 
ed generator with a much, much 
longer period. It made single hits at 
intervals of roughly 256 probes; it 
made double hits at intervals of 
roughly 64K; and when we stopped 
after 1.5 million probes, it had yet to 
hit three 1-bits in a row (intuitively, 
that should happen around 24 mil- 
lion), nor had it looped. 

This is an intriguing result. A 
QRNG with such a long period that 
codes so tightly in a 16-bit machine is 
a rare bird. We only wish that some- 
body would analyze its period from a 
theoretical standpoint. It would be al- 
most as nice if somebody would carry 
out a longer collision test. 

A question related to period length 
is: What is a good initial seed? The 
QRNG is initialized with two num- 
bers; what should they be for a maxi- 
mal period? It’s all very well to stick 
in two 16-bit prime numbers; if we 
had any theoretical understanding, 
we might be able to specify rules for 
the selection of good seeds. 


Distribution 

Of equal concern is the distribution. 
A few short tests have been made. 
Everett Carter generated 1000 num- 
bers using randi(100) with the flawed 
randi( ) function. He subjected them 
to a Chi-squared test with 99 degrees 
of freedom; the result was a probabil- 


ity of 0.82 that the sample was drawn 
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from a uniform distribution. Says 
Carter, ‘‘if I needed a uniform distri- 
bution, I’d try for better than 0.82.” 

Barr notes that, “provided MAXO 
is even, it is possible to run the gener- 
ator backwards. That is, if you think 
of it as producing a sequence Xj, Xo, 
... Xp, you can calculate Xy-2 from 
Xn and Xy-1. 

Peter Pearson made the remarkable 
assertion that ‘“‘sets of numbers drawn 
three at a time from rand0 are strong- 
ly interdependent. Specifically, if p, q, 
and r are the results of three succes- 
sive calls on randO, the quantity 
2(p +q )—rcan have one of only four 
values: 0, 32767, 65536, and 98303.” 

But on the other hand, Carter said, 
“On the correlation test, this genera- 
tor does very well over short spans (I 
never tried long spans). This test 
measures the independence of the 
numbers by calculating the correla- 
tion between one number and a num- 
ber later in the series. In the tests that 
I made with a lag distance of up to 20 
intervals, the correlations are below 
0.1 and most are well under 0.05. 
While one might hope for more inde- 
pendence, these values are very good 
relatively.” 

Clearly many more tests of this 
QRNG should be done. Knuth recom- 
mends the runs test and the collision 
test as particularly powerful and de- 
scribes algorithms for them and sev- 
eral others. 


The Mitchell-Moore OQRNG 

There is another simple QRNG, one 
that has guaranteed good character- 
istics and a ridiculously long period. 
Its only drawback is that it needs 55 
words of auxiliary space and a second 
QRNG to seed it. Knuth credits the 
method to J. G. Mitchell and D. P. 
Moore; its formula is: 


Xn — CXn->4 + Xn-ss) mod MAXO 


It is easily expressed in C; see Listing 
Four (page 27). It uses a 55-integer 
array initialized with numbers not all 
of which are even; usually these 55 
seeds are drawn from a simpler 
QRNG (Talley-Metropolis will do). 
The constants 24 and 55 are not arbi- 
trary; they were chosen because they 
produce a period of length 2°°. Nor 
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Dr e Dobb ‘S Clinic (Text begins on page 20) 
Listing One 


rem recurse.bat called with 41 42 %3 £4 45 £6 £47 %8 249 
if (41)==() exit 
prompt command level 41$g 


command /c recurse %2 43 24 45 £6 27 48 29 End Listing One 


Listing Two 

Talley Metropolis routines for 8086. Consumer Warning: This 
generator is experimental and lacks a sound mathematical 
basis or statistical validation -- USE AT YOUR OWN RISK. 


: 

} 

; 

’ 

; RandO: return a 16-bit quasi-random number in AX. 
: Preserves all registers except AX, flags. 
R 


andO: 
push dx 
mov dx,Xminus2 
mov ax,Xminus1 
mov Xminus2,ax 
add ax,dx 
rol ax,] 
mov Xminus1,ax 
pop dx 
re. 
3 
; RandI: return in AX a number in 0O..CX-1. 
: Preserves all except AX, flags. 
RandI: 
push dx 
call Rando ; ax. = rand0t) 
mul ex ; dxax = u*rand0() 
mov ax,dx ; ax = u*rand0() MAXO 
pop dx 
test ah, 80h 
jz Rand Ix 
ine ax ; ax = u*rand0() MAX 
RandIx: ret End Listing Two 


Listing Three 


; Talley/Metropolis routines for Z80. Consumer Warning: This 
; generator is experimental and lacks a sound mathematical 
; basis or statistical validation -- USE AT YOUR OWN RISK. 


) 


; RandO: return a 16-bit quasi-random number in HL. 
; Preserves all except HL, flags. 
RandO: 
push de 
ld de, (Xminus2) 
Ke hl, (Xminus1) 
ld (Xminus2),hl 
add hl,de 
add hl,hl 
jr ne ,RandOq 
ine hl 
RandOq: ld (Xminus1),hl 
pop de 
ret 
RandI: return in HL a number in 0O..BC-1. 


we we we 


Preserves all except HL, flags. 
(Continued on page 26) 
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NASA has only one shot at 


Jupiter with Project Galileo, so 
there’s no room for error. The 
purpose of the project is noth- 
ing less than to find out the 
origin of the solar system and 
seek the answer to the nature 
and origin of life itself. 
Galileo's success is all in 
the timing, and that’s where 
dBASE III™ from Ashton-Iate™ 
takes control. dBASE III tracks 
the details of the sequence 
of launch events. 
dBASE III was easy to bring 
on board. It’s powerful (one 
billion records) and has a built 
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in programming language that: 
has been taught to speak 
“Galileo.” dBASE III deals with 
the complex test details for 
Galileo as easily as it will deal 
with the complex details of your 
business for you. 

When you've only got 
one shot at getting something 
right, you need the most 
powerful and popular data 

management system on Earth 
...or Jupiter. 

For a dealer near you, call 
(800) 437-4329, ext. 2333. In 
Colorado call (303) 799-4900, 
ext. 2333. 


dBASE IIL The data management standard 
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are they unique; Knuth gives a table 
of other good pairs. Use 27 and 98 if 
you think you need a period of 2°. 


Random 8086 
The routines in 8086 assembly lan- 
guage may be found in Listing Two 
(page 24). The seeding routine is 
omitted, as are details of segment def- 
initions. Pay close attention to the 
consumer warning in the comments. 
It was Michael Barr who spotted the 
elegant equivalence between the C 
statements 

c*= 2;1f (C>MAX)c—= MAX; 
and the single 8086 instruction 

rol ax,1 


Boy, if you ever see a C optimizer that 
can find that transformation, buy it. 


Random Z80 

The QRNG in Z80 assembly lan- 
guage is in Listing Three (page 24). 
The most complicated part of the 
Z80 (or any other 8-bit) version is the 
simulation of a 16-bit unsigned mul- 
tiply. The one in Listing Three ts a 
standard routine straight out of that 
classic work, Z80O Programming for 
Logic Design by Osborne, Kane, Rec- 
tor, and Jacobson, published in the 
distant year of 1978 by Osborne and 
Associates and still one of our most 
useful references. 
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The only change we’ve made in Os- 
borne’s multiply is to use long jumps 
(JP opcodes) instead of short relative 
ones. A JP takes 10 clock cycles to do 
regardless, while a JR takes either 7 
ticks to fall through or 12 to jump. 
Ordinarily, a JR is the opcode of 
choice because it is a byte shorter 
and, under the assumption that it will 
fall through and be taken with equal 
frequency, should consume half a 
clock cycle less on average. 

However, if we can predict any- 
thing about the frequency with which 
a branch will be taken, we should 
make a choice between jump types. 
The last JP in Listing Three, for in- 
stance, will be taken 15 times and fall 
through but once. Clearly it ought to 
be a JP, since a JR would cost 30 
more cycles. 

The first of the three jumps should 
be a JR. It tests successive bits of the 
multiplier. In this application, those 
are bits of a quasi-random number, 
and the 50-50 assumption certainly 
ought to hold, indicating the use of 
JR. In a general-purpose multiply 
routine, we might expect that both 
multiplier and multiplicand will be 
positive binary numbers, but even if 
we expect only positive numbers less 
than 2!°—-so that we expect the jump 
to be taken 9 of 16 times (1.e., always 
taken for the first two bits and taken 
for half of the other 14 bits)—the JR 
still squeaks out two-tenths of a clock 
cycle faster than a JP. 3 

The middle jump is not so obvious, 
but because it will be executed in any 
manner on half or fewer of the itera- 
tions, it is also less important. In ef- 
fect, we choose here between a 5- 
cycle JP or a 3.5/6 cycle JR. The 
jump will be taken when no carry re- 
sults from adding the multiplier into 
the low word of the partial product. 
At first we thought that would be 3 
out of 4 times, a clear win for JP over 
JR; on reflection, we ain’t so sure. 
What do you think? 
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Dr. Dobb ‘S Clinic (Listing continued, text begins on page 20) Te ee ee ae 


Listing Three COLOR BUSTER!! 


CONVERT THE RGB OUTPUT OF YOUR 
COLOR BOARD FOR THE IBM PC OR AN IBM PC 
COMPATIBLE TO COMPOSITE B/W WITH 16 
LEVELS OF GRAY! 


RUN ALL APPLICATIONS REQUIRING A 


: Requires Mul16 to do DEHL = BC*HL 
RandI: 
eall Rand0 > HL = rand0() 


push de COLOR MONITOR ON YOUR COMPOSITE BLACK 

ex de-hl oe % WITH THE ABILITY TO ELIMINATE OR HIGH- 
“ 3 H BC *rand0() /MAXO LIGHT ANY COLOR GROUP. THE COLOR 

pop de BUSTER OUTPERFORMS ANY OTHER COLOR 

bit O,h TO B/W CONVERTER AVAILABLE. 

ret yA BUY YOURS TODAY AT THIS SPECIAL 

ine hl ; adjust to /M AX INTRODUCTORY PRICE FOR A LIMITED TIME 

os ONLY! 
ret 


Only $6995 


($3.00 SHIPPING & HANDLING) (CALIF. RESIDENTS ADD 6.5% TAX) 


STS Enterprises 
5469 Arlene Way, Livermore, CA 94550 
(415) 455-5358 


; a usable 16-to-32-bit multiply subroutine, producing 
; DEHL as the 32-bit result of HL * BC, preserves BC, AF. 


Mul16: ® & GS 6 Ge 6 ES © Ss © BE 6 GD 6 GH © SS 6 GWG 
push af Circle no. 47 on reader service card. 
1d a,16 ; loop count 
ex de ,hl ; multiplier to DE 
ld h1,0 ; clear partial product 4 

Mu116A: Dr.Dobb Sjournal 
ex de,hl ; next multiplier bit 
add hl,hl ; «eShifted to carry i i 
ex de,hl ; eeand O-bit appended to hi prod Subscription 
push af ; (save m’ier bit) Problems? 
add hl,hl ; next product bit to carry 
K's ne ,Mul16B | 
inc de ; adjust bit shifted earlier No Problem : 

Mul16B: pop af if m ter. bit. wass%, 
1s ne ,Mu116C GOy 
add hl,be ; add multiplicand to product 
ky AG Maz46e Give us a call and we'll 

? ‘ : 
eae ax yf Srapogat ine cacy straighten it out. Today. 

Mul16C: dec - : Outside California 
JP iis ‘i CALL TOLL FREE: 800-321-3333 
pop a ; 
ret End Listing Three Inside California 

aoe CALL: 619-485-6535 or 6536 

Listing Four 


/* Mitchell—Moore QRNG in C. Presumes the existence of a */ 
/* simpler QRNG named rOrand() and its seeder, rOseed(x). */ 


extern void rOseed(); 


ik 
extern unsigned rOrand(); TUT TLUTL 
™ 


static unsigned xa[55]; 
static int ':},k} 


e As Relational As They 





sh guna Get (for micros) 
uns ne X 5 
{ e Word Processor Screen 
rOseed(x); /® initialize rand0() predictably */ Editor Always Ta) 
for(j = 03; j < 553 ++j) xalj] = rOrand(); Operation 
i= 23% e New, Faster Version 
eet 545 for DOS 2, 3, AT 
rand () p 
{ Golemics, Inc. 
unsigned x; 2600 10th St., Berkeley, CA 94710 
x = xa(k] += xalj]; (415) 486-8347 
if (j==+0) j = 553 --j; 
fies =O) ok 2, Sigs eaKg 
return(x); net 
} End Listings Circle no. 45 on reader service card. 
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Productivity Tools from the Leading Publisher of C Programs. 


The Lattice® C Compiler 


The cornerstone of a program is its compiler; it 
can make the difference between a good pro- 
gram and a great one. The Lattice C compiler 
features: 


¢ Full compatibility with Kernighan and 
Ritchie's standards 

e Four memory model options for control and 
versatility 

e Automatic sensing and use of the 8087 math 
chip 

¢ Choose from the widest selection of add-on 
options 

e Renowned for speed and code quality 

e Superior quality documentation 


“Lattice C produces remarkable code. . .the 
documentation sets such a high standard that 
others don’t even come close. . .in the top cat- 
egory for its quick compilation and execution 
time and consistent reliability.’ 

Byte Magazine 


Lattice Library source code also available. 


Language Utilities 

Pfix 86/Pfix 86 Plus — dynamic and symbolic 
debuggers respectively, these provide multi- 
ple-window debugging with breakpointing 
capability. 

Plink 86 — a two-pass overlay linkage editor 
that helps solve memory problems. 

Text Management Utilities — includes GREP 
(searches files for patterns), DIFF (differential 
text file comparator), and more. 

LMK (UNIX “make”) — automates the con- 
struction of large multi-module products. 
Curses — lets you write programs with full 
screen output transportable among all UNIX, 
XENIX and PC-DOS systems without changing 
your source code. 

BASTOC — translates MBASIC or CBASIC 
source code directly to Lattice C source code. 
C Cross Reference Generator — examines your 





Call LIFEBOAT: 1-800-847-7078. In NY, 


Name 


C source modules and produces a listing of 
each symbol and where it is referenced. 


Editors 


Pmate — a customizable full screen text editor 
featuring its own powerful macro command 
language. 

ES/P for C — C program entry with automatic 
syntax checking and formatting. 

VEDIT — an easy-to-use word processor for 
use with V-PRINT. 

V-PRINT — a print formatting companion for 
VEDIT. 

CVUE — a full-screen editor that offers an 
easy way to use command structure. 

EMACS — a full screen multi window text 
editor. 

Fast/C — speeds up the cycle of edit-compile- 
debug-edit-recompile. 








Graphics and Screen 


Design 


HALO — one of the industry’s standard 
graphics development packages. Over 150 
graphics commands including line, arc, box, 
circle and ellipse primitives. The 10 Fontpack 
is also available. 

Panel — a screen formatter and data entry aid. 
Lattice Window — a library of subroutines al- 
lowing design of windows. 





Functions 


C-Food Smorgasbord — a tasty selection of 
utility functions for Lattice C programmers; 
includes a binary coded decimal arithmetic 
package, level 0 I/O functions, a Terminal In- 
dependence Package, and more. 

Float-87 — supports the 8087 math chip to 
boost the speed of floating-point calculations. 
The Greenleaf Functions — a comprehensive 
library of over 200 routines. 

The Greenleaf Comm Library — an easy-to- 
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use asynchronous communications library. 

C Power Packs — sets of functions useful for a 
wide variety of applications. 

BASIC C — This library is a simple bridge 
from IBM BASIC to C. 


Database Record 
Managers 


Phact — a database record manager library of C 
language functions, used in the creation and 
manipulation of large and small databases. 
Btrieve — a sophisticated file management sys- 
tem designed for developing applications under 
PC-DOS. Data can be instantly retrieved by key 
value. 

FABS — a Fast Access Btree Structure function 
library designed for rapid, keyed access to 
data files using multipath structures. 
Autosort — a fast sort/merge utility. 

Lattice dB-C ISAM — a library of C functions 
that enables you to create and access dBase 
format database files. 


Cross-Compilers 


For programmers active in both micro and mini 
environments we provide advanced cross- 
compilers which product Intel 8086 object 
modules. All were developed to be as functional 
— and reliable — as the native compilers. They 
are available for the following systems: 
VAX/VMS, VAX/UNIX, 68K/UNIX-S, 
68K/UNIX-L 
Also, we have available: 
Z80 Cross-Compiler for MS- and PC-DOS — 
produces Z80 object modules in the Microsoft 
relocatable format. 


New Products 


Run/C — finally, a C interpreter for all levels of 
C Programmers. 

C Sprite — a symbolic debugger with break- 
point capability. 


1-212-860-0300. 
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Structured Assembly 
Language Programming 
for the Z80 


By DANIEL N. OZICK. ‘’Mr. Ozick is not only 
a fine programmer but also a solid techni- 
cal writer. He knows his subject inside out 
and backwards. This is a superb piece of 
documentation.’—Microsystems. (The 
book is accompanied by an 814” disk con- 
taining source code for the complete 
macro and run-time libraries.) Book /Soft- 
ware: #7299-6; $49.95 


Introduction to CP/M 
Assembly Language 
Third Edition 


By JON LINDSAY. “This book is the best 
instructional text on the CP/M assembler 
in print.'—CP/M Review. "This book is a 
classic that belongs on the reference 
shelves of all assembly language program- 
mers."—Microcomputing. #5210-3; $17.95 


Programming inC 


By STEPHEN G. KOCHAN. Written by one 
of AT&I’s in-house programming instruc- 
tors, this book contains over 90 program 
examples and covers all the latest lan- 
guage features. ‘‘Kochan’s book, simply, is 
the BEST introduction to C..\—UNIX Re- 
view. #6261-3; $21.95 


Pascal Programs for 
Data Base Management 


By TOM SWAN. Create, edit, search, sort, 
merge, and much more—here’s the best 
bargain in data base management to date! 
Contains the source code for a complete 
relational data base system—ready to run 
—in Apple Pascal and UCSD Pascal IV. 
for the IBM PC. Book: #6272-9;: $19.95/ 
Book/Software (Apple): #7272-4; $49.95/ 
Book/Software (IBM): #7273-2; $39.95 


Software Construction Set for 
the IBM PC and PCjr 


By ERIC ANDERSON. Put these IBM BASIC 
examples to work and see how fast, effi- 
cient, reliable, and easy to use your pro- 
grams will be! Much more than a collec- 
tion of specialized subroutines, this is a 
complete package of valuable software 
tools for the programmer. #6353-9/ 
$18.95 | 


Exploring the UNIX System 


By STEPHEN G. KOCHAN and PATRICK H. 
WOOD. An indispensable hands-on guide 
produced with AT&T Bell Laboratories’ 
support, this complete introduction to 
the UNIX environment covers the file sys- 
tem, shell programming, program devel- 
opment, screen editing, and system ad- 
ministration. #6268-0; $3195 





Macintosh Revealed 

An Apple Press Book 

Volume One: Unlocking the Toolbox 

Volume Two: Programming with the 
Toolbox 


By STEPHEN CHERNICOFF. One of the most 
eagerly anticipated books of the Mac era, 
this two-volume set reveals and explains 
all of the major ROM routines of the Mac- 
intosh Toolbox and puts them at your 
command. Volume One covers the basic 
elements of the operating system, focus- 
ing on the Finder and QuickDraw graphic 
routines. Volume Two moves on to higher 
level constructs of the Toolbox that will 
enable you to create your own programs 
that adhere fully to Apple Computer's 
Macintosh User Interface Guidelines. Vol- 
ume One: #6551-5; $24.95/Volume Two: 
#6561-2; $29.95 


The 8086/8088 Primer 


An Introduction to Their Architecture, 
System Design, and Programming 
Second Edition 


By STEPHEN P. MORSE. Written by the per- 
son responsible for the design of the 8086 
microprocessor, this revised edition has 
been updated to provide professionals 
with a thorough introduction to Intel's 
8086 and 8088 microprocessors. In addi- 
tion to chapters on a low-level program- 
ming language, ASM-86, and a high-level 
language, PL/M-86, a new chapter exam- 
ines the Pascal language. #6255-9; $18.95 


At bookstores and computer dealers or order direct today: 
Call 800-631-0856 (201-393-6300 in New Jersey). MasterCard and VISA accepted. 


Z80 is aregistered trademark of Zilog. UNIX is a trademark of AT&T Bell Laboratories. 
CP/M is a trademark of Digital Research. IBM PC and PCjr are registered trademarks of International Business Machines Corp. 





Macintosh is a trademark licensed to Apple Computer, Inc. 


HAYDEN BOOK COMPANY 


10 Mulholland Drive, Hasbrouck Heights, NJ 07604 





In Canada: Holt, Rinehart & Winston, 55 Horner Avenue, Toronto, Ontario M8Z #4X6 
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C Compilers for 
MSDOS 


by the C Special Interest Group 
of PicoNet and the Silicon Valley 
Computer Society under the 
direction of Richard Relph 


Our reviewers found that some of the 
fastest compilers overall were relative- 
ly slow in doing screen I/O, and un- 
covered order-of-magnitude differ- 
ences in execution time and 
generated-code size. 
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hat would you consider the ideal credentials for 
VV a reviewer of computer language compilers? 

Would you want a software designer, or per- 
haps even a compiler designer? Should the reviewer be a 
professional who earns his or her living at the keyboard? 
Or should the review be conducted by the weekend pro- 
grammer who really understands the value of user-friendly 
software as well as the frustration of user-hostile documen- 
tation? 

The reviewer for this project is all of the above. This 
report on 13 C compilers for MSDOS was conducted by 
the joint C Special Interest Group (C-SIG) of PicoNet (a 
non-profit, general microcomputer users’ group) and the 
Silicon Valley Computer Society (SVCS), an IBM PC us- 
ers’ group. 

This combined C-SIG is composed of .a broad cross- 
section of microcomputer users. Some are language-com- 
piler designers, some design and maintain systems soft- 
ware, still others make their living developing commercial 
software such as spreadsheet or data base packages. 
There are several novice programmers in the group, but 
most are seasoned programmers, if not expert software 
designers. The “reviewer,” therefore, is well qualified for 
the job. 


Background 

The first C-SIG was organized in 1983 by a group of Pi- 
coNet members. Their purpose was to provide a forum for 
discussion and study for those interested in the C program- 
ming language. In the beginning, classes were organized, 
and after 10 or 12 sessions the language was covered fairly 
thoroughly. The classes brought all members of the group 
to a common basic level of understanding of C. 

The group soon graduated to developing software utili- 
ties: those tools that are commonly found on the larger 
systems for which C was originally developed, but that 
are not commonly available for the microcomputer envi- 
ronment. The C-SIG also organized group purchases of 
compilers, other software packages, and hardware at dis- 
counts, so that all members could own a quality C compil- 
er, participate in the various group activities, and contrib- 
ute to group projects. 

Invariably, at the monthly meetings someone would 
ask what was the best current compiler (or version there- 
of), opening a debate over which compilers were the fast- 
est, which produced the optimum code, which conformed 
most to “standard” C. We soon recognized from these 
discussions that the group was somewhat inbred; that is, 
among the 20 or 30 members, only two or three C compil- 
ers were represented (partly due to group purchases). 
Then, near the beginning of 1985, the PicoNet and SVCS 
C-SIGs merged. 

SVCS was made up of IBM PC users. PicoNet was tra- 
ditionally a CP/M group, but a large number of the origi- 
nal C-SIG members had recently acquired MSDOS-based 
PCs through a group purchase. Out of the group’s new 
interest in MSDOS came increased interest in C compilers 
that ran under MSDOS. We soon discovered that the 
number of compilers available for the PC environment 
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was large indeed, and we quickly identified some 24 im- 
plementations. The questions of which was fastest, which 
produced the tightest code, and which was closest to the 
standard continued to come up, but we learned that no 
one had the answers. We decided to find them. 

Given the magnitude of the task, the breadth of the 
group, and the number of individuals involved in the pro- 
ject, responsibilities had to be divided among the partici- 
pating members. Each joined a group that was assigned a 
specific task critical to the overall project. The groups had 
responsibilities in the following areas: 


e Standards: responsible for the evaluation of compilers’ 
and libraries’ adherence to the standard C language as 
defined by Kernighan & Ritchie (K&R) in The C Pro- 
gramming Language. Also responsible for qualifying all 
benchmarks written or acquired to measure compiler per- 
formance for universal compatibility and for assessing 
each compiler’s ease of use (Richard Relph, Don Law- 
rence, Andi Pisiali, Stan Peters). 

¢ Benchmarks: responsible for writing and/or acquiring C 
compiler benchmark programs and for conducting bench- 
mark tests (Fred Viles, Steve Mahn, Scott Thomas, 
George Giomousis, Bill Overstreet, Fletcher Johnson). 

e Documentation: responsible for reviewing documenta- 
tion for clarity, completeness, style, and presentation. 
Also responsible for evaluating customer service for re- 
sponsiveness and technical proficiency (Chuck Rulofson, 
Don Hockler, Bob Stephan, Peter Vutz). 

¢ Writers: to put it all together (Irwin Diehl, Don Dodge). 


That’s the background—who we are, what we did, why 
we did it, and how. Oh yes, we should mention the 
‘‘where.” We’ve been most fortunate to have been provid- 
ed a regular meeting place by ZeroOne Systems (former- 
ly Technology Development of California). ZeroOne has 
been a most gracious host for the regular monthly meet- 
ings and the special weekend benchmark sessions. Their 
continuing support is appreciated. 


Benchmarks 

The benchmark group was charged with measuring the 
performance of the code produced by the various compil- 
ers. In the course of several meetings, we decided on our 
general approach and on the specific benchmark func- 
tions to be produced. We first discussed the possibility of 
producing a real-world benchmark program, one that 
would perform some useful function using an appropriate 
mix of language and library features. This plan, although 
attractive, was problematic since we could not agree on an 
appropriate mix. We settled on a “surgical” approach: 
many small functions, each intended to test a single fea- 
ture of the compiler or its library. 

We started by drawing up a list of every aspect of com- 
piler and library performance that any one of us had ever 
wanted to see in other compiler reviews; not surprisingly, 
the list was enormous and impossible. In the interest of 
completing this project at all, we pared the list down, 

ending with 30 separate benchmarks to test performance 
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New C Books from Plum Hall 





Efficient C (Thomas Plum and Jim Brodie, 1985) 
provides a small suite of C functions into which 
the reader can “plug in” any C statement and 
determine how many microseconds of CPU time 
it takes to execute. Expanding upon this tech- 
nique, the book presents tables of CPU time and 
code space for C operators, control structures, 
and function calls. These allow the reader to 
make fairly accurate estimates of the resources 
that a program will take, without resorting to 
assembler listings. The book discusses optimiza- 
tion techniques performed automatically by 
several compilers, as well as those techniques 
which can be effectively used by the program- 
mer. (Plum and Brodie are respectively Vice- 
Chair and Chair of the ANSI committee X3J11 
which is standardizing C language.) 


Reliable Data Structures in C (Thomas Plum, 
1985) is an intermediate-level book that picks up 
where introductory books leave off. It describes 
techniques for a “‘no surprises” usage of pointers, 
Structures, and files. Standard data structure 
techniques like stacks, queues, and trees are 
presented using reliability techniques, along with 
a complete menu-and-forms screen generator. 
Relevant information about the draft ANSI stan- 
dard for C is presented to allow programmers to 
write compatibly with existing and forthcoming 
compiler and interpreter environments. 


Learning to Program in C (Thomas Plum, 1983) 
presents the fundamentals of C. Presupposing 
only an acquaintance with computers, it covers C 
up through the basics of pointers and structures. 


C Programming Guidelines (Thomas Plum, 1984) 
provides a style standard for projects working in 
C language. Arranged in “manual-page’’ refer- 
ence format, it gives rules for using variables, 
data types, operators, expressions, statements, 
functions, files, libraries, and documentation. 


Each book is $25.00 (plus 6% within NJ), $30.00 
outside USA (airmail). We ship within two days 
when ordered by phone or mail with credit card, 
purchase order, or check. 


Plum Hall Inc 
1 Spruce Av 
Cardiff NJ 08232 
609-927-3770 


Please send N copies of 

___ Efficient C 

__ Reliable Data Structures in C 
___ Learning to Program in C 
___ C Programming Guidelines 


NAME 
COMPANY 
ADDRESS 
CrPyY 


STATE ZIP 





___ Check __ Mastercard __ Visa ___ American Express 


CARD NO EXPIRATION 
SIGNATURE 
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in the areas of code size; time to compile and link; storage 
class support; math; array and pointer referencing; func- 
tion calling; optimization; screen and disk I/O; and gen- 
eral performance. We ran some of these functions for dif- 
ferent memory models and some with the 8087 options 
available. 

To get accurate and consistent results, we used a com- 
mon format for all the execution-time benchmarks. Each 
benchmark was written as a function that-accepted a loop 
count and returned the measured time in tenths of seconds. 
We wrote a pair of functions to measure an interval of time 
using the system clock, avoiding the problems inherent in 
the stopwatch approach. All compilers except Digital Re- 
search’s provided a library function giving access to DOS 
interrupts, so the timer functions could be written easily in 
C for all but DRI. (So we wrote an assembly routine.) We 
then verified that the overhead in the timer functions was 
negligible for all compilers. The skeleton for all benchmark 
functions is in the Figure (below). 

We adjusted each loop count to force the benchmark 
into a reasonable time frame (about 1 minute), so as to 
minimize the percent error in the timer functions. Al- 
though the system-clock interrupt returns a measurement 
of the time down to hundredths of a second, the clock is 
actually updated only 18 times per second, so the time 
reported for a given function can vary by as much as 0.2 
seconds. 

Except for the 8087 benchmarks, all the tests were per- 
formed on a Leading Edge PC. running MSDOS 2.11 and 
equipped with 640K RAM and a 10 Mb hard disk. These 
machines are close PC-compatibles running at a clock rate 
of 7.16 MHz; consequently, CPU-bound benchmarks will 
take 50 percent longer on an IBM PC. The Norton Utilities 
(V3) confirm this performance factor. 

We selected the Leading Edge PC because we had 
made a group buy of several identically configured sys- 
tems. We ran the compile-time and link-time benchmarks 
on the same machine in two different ways: using the hard 
disk, with care taken to ensure that files were read and 
written to the same location for each compiler, and on a 
512K JDrive RAM disk. We ran the disk I/O benchmarks 
on the hard disk, again ensuring that the same disk loca- 


benchfn(loop) 
int loop; 


{ 





/* Initialization */ 


time_O(); /* Startclock*/ 
for(; loop ; loop) 


return(time_n( )); /* As sec/ 10 */ 


/* Code to be timed */ 


Figure - _ 
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tions were used. Before you moan “but I only have a plain 
IBM PC with floppies,’ remember that the goal here was 
to compare the compilers, not the machines. The ratio of 
the timings should be the same anywhere. 


Benchmark Design 

So much for background. Now we will discuss the bench- 
mark functions, grouped by aspect to be tested. We have 
listings for all but the compile- and link-time programs, 
which were not actually executed. For a diskette (5%4-inch 
MSDOS) with the listings send a check for $6.00 payable 
to M&T Publishing to: DDJ Compiler Review, 2464 Em- 
barcadero Way, Palo Alto, CA 94303. 


Code Size 

We wanted to get an idea of the granularity of the library 
and the minimum .EXE file size that could be produced. 
Granularity, for those not familiar with the term, refers to 
how finely the library is structured. A highly granular 
library allows the bare minimum of object code to be 
linked for each function. Four programs were written for 
these tests: 


¢ minmain.c—Main program with no executable code. 

¢ minputs.c—Main program with one puts( ) call. 

¢ minprtf.c—-Main program with one printf( ) call. 

¢ minfio.c—Main program with calls on fopen( ), fgets( ), 
fputs( ), and fclose( ). 


We compiled and linked, but did not execute, each pro- 
gram. We were especially interested in minprtf.c, since 
using printf( ) usually means dragging in the whole float- 
ing-point package. Sorne compilers provided an option to 
link with an integer-only version of printf( ). In those 
cases we linked minprtf.c twice, once with the integer- 
only and once for the full floating-point versions of 
printf( ). See Table 1 (page 34) for the results. 


Clocking Compile and Link Time 

Since most of the performance benchmarks are very short 
and not representative of typical programs, we used sepa- 
rate programs ranging from | to 1000 lines for this test. 
They were: 


e docl.c—A one-liner, to show the minimum overhead. 


oe edocl0.c—A 10-liner, about the smallest module you’d 


ever compile. 


_ edoc100.c—This 100-liner is the most significant since it 


represents a typical size of source file. 
¢edocl000.c—A 1000-line program. Basic overhead 
should be minimal here. 


Doc100.c was produced from a preexisting program be- 
longing to one of the group. Doc1000.c is a stripped-down 
version of the DIFF program available from DECUS ( Dig- 
ital Equipment Corp. Users’ Society). 

Since modular compilation tends to be the rule with C 
programming, we timed the compile and link steps sepa- 
rately. The compile step included all phases of the compila- 
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From now on MATIS’is only $4995! 


(MATIS, the complete User Interface development tool has been selling for $150.) 


Why the radical price cut? 
We decided after looking over the compe- 
tition that MATIS had so many advan- 
tages it should be made available to more 
programmers. We decided to compete 
aggressively so you could easily afford to 
have MATIS in your bag of tricks. We 
hear from MATIS users in the USA and 
France that it is a truly loveable product. 
Sooo...we're running this big ad to pro- 
mote our new low price. 


MATIS windows are beautiful. 
Display any portion of any screens you 
create at any point in your program. 
Scroll in any direction manually with cur- 
sor keys...or automatically. 


And the screens are 
HUMUNGEOUS! 

MATIS screens can be just about as big as 
you want...up to 65,534 rows by 
65,534 columns! The number of screens 
is only limited by available memory. 


Print big MATIS screens directly. 
One command sends your screens to your 
printer with no need to program special 
routines when your virtual screen is big- 
ger than your terminal screen. 


User input fields are a snap. 
Creating fields for data entry is easy with 
no limit to size or number by screen. 
Request for input : 
separately or 
in blocks. % 









Denis Moran 
President, Softway, Inc. 


Control your keyboard 

with MATIS. 

It Keeps track of keys that are pressed 
during the execution of your program 
and lets you assign specific functions to 
selected keys. 


Control that screen too! 

MATIS is extremely versatile and flexible 
when it comes to controlling lines, col- 
umns, fields, and text. They can be modi- 
fied, transferred, displayed or moved 
with a single command. All video attri- 


butes are supported: color, reverse video, 


blinking...you name it, you got it. 


Want an interactive 

screen builder? 

You've got it with MATIS. It’s called 
“MATPAGE”™ and it lets you create 
and modify any of your screens in an 


MATIS adds over 70 routines 

to your program. 

Written in Assembler, MATIS routines 
are fast and powerful giving your pro- 
gram improved efficiency and enhanced 
visual appeal, while they reduce its size 
and maintenance worries. And MATIS 
separates screen design from the core 
of your program. 


MATIS is unique. 


We don't think there's a single program 
that combines as many tools in one 
package as completely or as well as 
MATIS. It interfaces with Intepreted and 
Compiled BASIC (Microsoft), C (Lattice, 
Microsoft, Aztec), PASCAL (IBM, Micro- 
soft) and ASSEMBLER. All you need 
is an IBM* PC/XT or true compatible 
under DOS, 128k or RAM, monochrome 
or color monitor. 

You get an easy to follow no-frills 
manual and a 30-Day Money Back 
Guarantee. 


Late News: 

MATIS/T"™ for TURBO-PASCAL** 
only $29.95 

An indispensable add-on at a dynamite 
price. What more can we say? 


_Dexu's 


Denis Moran 


™ MATIS, MATIS/T, & MATPAGE are Trademarks of Softway, Inc. 


*IBM is a Reg. Trademark of IBM Corp. 


interactive mode. **Turbo Pascal is a Reg. Trademark of Borland International 
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tion, including assembly, if any. The compile and link pro- 
cess was controlled by a batch file since we weren't 
interested in benchmarking the testers’ typing speeds. 
Some compilers provided a control program that allowed 
the linker to be run automatically after the compile with a 
single command. In these compilers, we defeated that op- 
tion and issued a second command to do the link so we 
could derive separate compile and link times. To produce 
the time estimate, we used the Norton Utilities timemark 
program, invoking it from the batch file at the appropriate 
points. See Tables 2a and 2b (page 34) for these results. 


Testing Screen and Disk I/O 

We wanted to test how fast the generated code could 
write to the console using puts( ) and printf( ), as well as 
how fast it could read and write to the disk. We wrote six 
functions to find out. 


¢ The fillscr.c function used puts( ) to write a string of 
1248 characters to the screen without scrolling. Scrolling 
was prevented by using a bare carriage return every 78th 
character of the string. The screen gradually fills because 
puts( ) adds its own newline at the end of the string, and 
the puts( ) call is repeated <loop> times. The screen was 
cleared by the DOS CLS command prior to running this 
test. 

e The scroll.c function was almost the same as fillscr( ), 
except the string had a newline every 78th character so 


each puts( ) produced 16 lines of characters plus a blank 
line on the screen. So the time difference between scroll( ) 
and fillscr( ) measured the scrolling overhead. 

¢ The prtf.c function produced the same number of char- 
acters and lines as scroll( ), except it used printf(_ ) instead 
of puts( ) and executed each basic format conversion sev- 
eral times. Comparing the time for prtf(.) to that for 
scroll( ) shows how efficiently the compiler’s printf( ) 
function performs its conversion duties. 

¢ The cpychr.c function copied a 10,000-byte file using 
fgetc( ) and fputc( ). 

¢ The cpyblk.c function copied a 10,000-byte file using 
fread( ) and fwrite( ) to copy in 1024-byte blocks. The 
difference between the times for these functions reveals 
the advantage blocked I/O has in a particular compiler’s 
library. 

¢ The diskio.c function was designed to test random char- 
acter I/O toa reasonably large data file. It used fseek( ), 
fgetc( ), and fputc( ) to randomly read and write individ- 
ual characters in a previously created data file 240,000 
bytes long. 


We argued about whether to use fopen( ), fread( ), 
fwrite( ), and the like, rather than open( ), read( ), 
write( ), and other corresponding functions. The latter 
functions were provided with many of the compilers and 
might have produced faster times, but ultimately we de- 
cided to use the f functions, primarily on portability con- 
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Programming Journal. 
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Twelve issues per year 
of technical info on C, 
Assembly, Neon, Basic, 
Forth, Pascal and Lisp. 
Programming ON the 
Mac, FOR the Mac! 


MacTutor 
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siderations. The February 1985 preliminary draft of the 
proposed ANSI standard does not include open( ), et al., 
on the grounds that they are too closely tied to the Unix 
Operating system and that they are redundant. We 
dodged the potentially sticky problem of conversion be- 
tween newline and CR-LF by making sure that none of the 
data files contained these characters. 


Testing String Library Functions 

We wanted to test some library functions beyond the usual 
I/O functions. We were concerned, though, that many of 
the functions we could test would not be provided with all 
of the compilers, so we wound up with a single benchmark 
function, isort.c, to test stremp( ) and strepy(_ ). This func- 
tion used stremp( ) and strcpy( ) to perform a simple sort 
of an array of up to 1024 eight-character strings. (In this 
case, the <loop> parameter was used to control the num- 
ber of elements to sort; it does not represent the number of 
sorts performed.) The isort.c test tells little about compiler 
performance per se, but it does give a clue as to how well 
the runtime library was written. 


Math Tests 
We wrote four functions to test basic arithmetic functions 
for various data types. 


¢ The tint.c function includes 1500 add, 1600 subtract, 


A Professional Quality Z80/8080/8085 Disassembler 


WHEN YOU NEED SOURCE FOR YOUR CODE 
you need REVAS 3 


REVAS interactively helps you: 
Analyse your software for modification 
disassemble files as large as 64K 
Assign Real labels in the disassembly 
Insert COMMENTS in the disassembly 
Generate a Cross Reference (XREF) listing 


A 60 page manual shows how the powerful REVAS 


command set gives you instant control over I/O to files, 
printer, or console; how to do a disassembly; and even 
how the disassembler works! You get on line help, your 
of data 
interpretation, and calculation in any number base! 


choice of assembler mnemonics, control 


REVAS runs in Z80 CPM computers; is available on 
8°’ SSSD (standard), RAINBOW, and other (ask) formats 


Price: $90.00 (plus applicable tax), Manual only: $15.00 


REVASCO 
6032 Chariton Ave., Los Angeles, CA90056 
Voice. (2713)649-3575 Modem: (213)670-9465 
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200 multiply, and 200 divide operations, <loop> times. 
Inner loop overhead amounts to <loop> * 100 test-for- 
zero and decrement operations. Since there are not many 
ways to perform 16-bit integer arithmetic on an 8088, we 
expected most of the compilers to perform about equally 
on this one. 

¢ The tlong.c function was exactly the same as tint( ), ex- 
cept that the variables involved in the adds, subtracts, 
multiplies, and divides were all declared long instead of 
int. Significant differences between compilers were more 
likely here. 

«The tfloat.c function tested floating-point arithmetic 
with 40 each adds, subtracts, and multiplies and 20 di- 
vides, all done <loop> times. 

e The tdouble.c function was the same, except that the 
variables were declared double instead of float. For most 
compilers, tdouble( ) should be somewhat faster than 
tfloat( ) since K&R calls for all floats to be converted to 
double before being used in an expression. Tfloat( ) and 
tdouble( ) were run with whatever flavors of floating- 
point support (including 8087 options) were available for 
each compiler. The results of these tests appear in Table 
3b (page 38) and Table 4 (page 43). 


Array and Pointer Tests 
We wrote two functions to explore how efficiently the 
compilers handled array- and pointer-referencing tasks. 


CP/MAC ™ 


CP/MAC gives you CP/M-80 programs the way you 
want, and the way the Macintosh™ was meant to be 
used. They are on the same disks with your other 
Macintosh files. You can open and start them the 
same ways you open paintings or other Macintosh 
documents. And graphic controls and cues help you 
while they are running - including a continuous 
display of disk availability. 


CP/MAC works with hard disks and RAM disks. With 
a 512k Mac, CP/MAC gives you Z80 emulation - not 
available anywhere else. And CP/MAC transfers 
programs and any other files from CP/M computers. 
CP/MAC is a quality product and shipping now. Ata 
price you can afford - $135. Order by phone (714-953- 
8985) or mail to: 
LOGIQUE 


30100 Town Center Dr. “0” Suite 198 
Laguna Niguel, Ca. 92677 


MC/VISA or COD ok. Or ask your dealer. 


8080 emulation with about 42k TPA on a 128k Macintosh. Z80 
emulation with 63k TPA on a 512k Macintosh. CP/M 2.2 BDOS and 
BIOS calls. LST and PUN output to the printer, RDR and CON input from 
the keyboard, and CON outputs to the CP/MAC window. ADM-3A 
emulation with reverse video and line insert/delete. 


Macintosh is a trademark licensed to Apple Computer, Inc. CP/M is a registered 
trademark of Digital Research, Inc. CP/MAC is a trademark of Logique. 
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The function array.c simply initialized a three-dimension- 
al array of 1000 ints, and pointer.c did the same, but using 
a pointer to a pointer to a pointer to an int. The unneces- 
sary extra levels of indirection were added to increase the 
amount of pointer dereferencing relative to the overhead; 
i.e., to increase the ratio of data to noise. 


Function Call Tests 

To test the overhead due to function call and return, we 
created a version (fibtest.c) of the fib benchmark from 
the August 1983 issue of Byte magazine. (This is a good 
test of function-call overhead because it’s composed en- 
tirely of negligible arithmetic and recursive calls.) As 
with tint( ), the optimum code for function calls and re- 
turns is well known, so we did not expect to see much 
variation between compilers on this test, although signifi- 
cant differences would be interesting. 


Storage Class Tests 

We were curious about the efficiency of the code generat- 
ed for variables of various storage classes and in particu- 
lar about how well register variables were supported. To 
find out, we wrote three almost-identical functions: au- 
totst.c, stattst.c, and regtest.c. Each contained four empty 
for loops. The only difference among the functions is that 
the four loop variables were declared with automatic, 
static, and register storage classes, respectively. 


Looking For Optimization 
We thought it would be a nice idea to try to determine just 





how extensive each compiler’s optimization algorithms 
were. To that end we wrote optimize.c, a mishmash of 
statements that a compiler could reasonably be expected 
to optimize. The idea was that the more cases a compiler 
noticed and optimized, the better its performance on the 
test would be. 


Assessing General Performance 

The looptst.c function did nothing at all; it was just an 
empty loop. We included it so that we could get an idea of 
how much overhead was being introduced by our outer 
loop in each of the benchmarks. Looptst( )’s inner loop did 
nothing 10,000 times, so there were 5,000,000 total loop 
iterations. 

We knew we could not get away with not running the 
infamous Byte sieve benchmark, so we decided to go over- 
board and produce three, starting with sieve.c, our version 
of the standard sieve benchmark as published in the Janu- 
ary 1983 Byte. We added rsieve.c, identical to sieve( ) 
except that the two most frequently referenced variables 
were declared register. This is the way some vendors run 
the sieve when producing numbers for their advertising 
copy. And we wrote psieve.c, a pointerized version of the 
sieve. This function may not prove very useful in compar- 
ing compilers, but writing it was an interesting exercise. It 
showed us that it is not true that using pointers is always 
better than using array references. Psieve( ) is considera- 
bly less readable and performs only marginally better 
than rsieve( )—on some compilers it actually ran at a 
slower rate! 
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Composite or Split Video. 

Any polarity of video or sync. 

Inverse Video Capability. 

Small Size: 6.5 x 9 inches. 

Upper & lower case with descenders. 

7 x 9 Character Matrix. 

Requires Par. ASCII keyboard. 


FOR 8 IN. SOURCE DISK 
(CP/M COMPATIBLE) 
ADD $10 


Digital Research Computers 


P.O. BOX 461565 » GARLAND, TEXAS 75046 - (214) 225-2309 
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#ZRT-80 
(COMPLETE KIT, 2K VIDEO RAM) 


BLANK PCB WITH 2716 
CHAR. ROM. 2732 MON. ROM 


* + + + 4 


$4995 


SOURCE DISKETTE - ADD $10 
SET OF 2 CRYSTALS - ADD $7.50 
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64K S100 ST 
$1399 


NEW! 


LOW POWER! 
150 NS ADD $10 


BLANK PC BOARD 





















Peeks 


PRICE CUT! 


WITH DOCUMENTATION 
$49.95 





FEATURES: 
SUPPORT ICs + CAPS~ * Uses new 2K x 8 (TMM 2016 or HM 6116) RAMs. 
$17.50 * Fully supports IEEE 696 24 BIT Extended 
‘ Addressing. 
* 64K draws only approximately 500 MA. 
FULL SOCKET SET * 200 NS RAMs are standard. (TOSHIBA makes 
$14.50 TMM 2016s as fast as 100 NS. FOR YOUR HIGH 


SPEED APPLICATIONS.) 
SUPPORTS PHANTOM (BOTH LOWER 32K 
AND ENTIRE BOARD). 
2716 EPROMs may be installed in any of top 48K. 
* Any of the top 8K (E000 H AND ABOVE) may 
be oe to provide windows to eliminate 
any possible conflicts with your system monitor, 
FOR 56K KIT $1 25 disk controller, etc. : : 
Perfect for small systems since BOTH RAM and 
EPROM may co-exist on the same board. 


TESTED ADD $50_ BOARD may be partially populated as 56K. 
64K SS-50 STATIC RAM 


$4 1 goo KIT) : 


ee 

NEW! 
LOW POWER! 
RAM OR EPROM! 


BLANK PC BOARD 
WITH 


FULLY SUPPORTS THE 
NEW IEEE 696 S100 
STANDARD 
(AS PPOPOSED) 


* 


x 






® 




















FEATURES: —- 
Uses new 2K x 8 (TMM 2016 or HM 6116) RAMs. 
Fully supports Extended Addressing. 

64K draws only approximately 500 MA. 

200 NS RAMs are standard. (TOSHIBA makes 


x 


DOCUMENTATION 
$52 


* 
* 
* 





TMM 2016s as fast as 100 NS. FOR YOUR HIGH 


SPEED APPLICATIONS.) 
eae: cease * Board is configured as 3-16K blocks and 8-2K 
$18. blocks (within any 64K block) for maximum 
flexibility. 
FULL SOCKET SET * 2716 EPROMs may be instalied anywhere on 
$15.00 Board. 
: * Top 16K may be disabled in 2K blocks to avoid 
56K Kit $129 any |/O conflicts. 
64K Kit $139 * One Board supports both RAM and EPROM. 


RAM supports 2MHZ operation at no extra 






charge! 
ASSEMBLED AND * Board may be partially populated in 16K 
TESTED ADD $50 increments. 


EPROM II 
FULL 


BLANK 


PC BOARD 
WITH DATA 
$39.95 





EPROM KIT 
$69.95 


A&T EPROM 
ADD $35.00 


SUPPORT 
IC's 





PLUS CAPS 
$16 


ce oa 





We took our very popular 32K S100 EPROM Card and added 
additional logic to create a more versatile EPROM/RAM Board. 


FEATURES: 


FULL 
SOCKET SET 
$15 
This one board can be used in any one of four ways: 
A. As a 32K 2716 EPROM Board 
B. As a 32K 2732 EPROM Board (Using Every Other Socket) 
C. As a mixed 32K 2716 EPROM/2K x 8 RAM Board 
D. As a 32K Static RAM Board 
Uses New 2K x 8 (TMM2016 or HM6116) RAM’s 
Fully Supports IEEE 696 Buss Standard (As Proposed) 
Supports 24 Bit Extended Adressing 
200 NS (FAST!) RAM'S are standard on the RAM Kit 
Supports both Cromemco and North Star Bank Select 
Supports Phantom 
On Board wait State Generator 
Every 2K Block may be disabled 
Addressed as two separate 16K Blocks on any 64K Boundary 
Perfect for MP/M* Systems 
RAM Kit is very low power (300 MA typical) 


32K STATIC RAM KIT — $109.95 


For RAM Kit A&T — Add $40 


* 


+ + + + + + Ot ee OF 










TERMS: Add $3.00 postage. We pay balance. Orders under $15 add 75¢ 
handling. No. C.O.D. We accept Visa and MasterCharge. Tex. Res. add 
5-1/8% T ax. Foreign orders (except Canada) add 20% P & H. Orders over 
$50, add 85¢ for for insurance. 


WE ARE NOT ASSOCIATED WITH DIGITAL RESEARCH INC. (CALIF.) THE SUPPLIERS OF CPM SOFTWARE 


Circle nn 220n reader service card. 





TOTAL CONTROL 
with LMI FORTH" 


es 


For Programming Professionals: 


an expanding family of 
compatible, high-performance, 
Forth-83 Standard compilers 
for microcomputers 


For Development: 


Interactive Forth-83 Interpreter/Compilers 

e 16-bit and 32-bit implementations 

Full screen editor and assembler 

Uses standard operating system files 

400 page manual written in plain English 

Options include software floating point, arithmetic 
coprocessor support, symbolic debugger, native code 
compilers, and graphics support 


For Applications: Forth-83 Metacompiler 

e Unique table-driven multi-pass Forth compiler 

¢ Compiles compact ROMable or disk-based applications 
e Excellent error handling 

e Produces headerless code, compiles from intermediate 
States, and performs conditional compilation 
Cross-compiles to 8080, Z-80, 8086, 68000, and 6502 

e No license fee or royalty for compiled applications 


Support Services for registered users: 
e Technical Assistance Hotline 

© Periodic newsletters and low-cost updates 
e Bulletin Board System 


Call or write for detailed product information 
and prices. Consulting and Educational Services 
available by special arrangement. 









Laboratory Microsystems Incorporated 


f°: Office Box 10430, Marina del Rey, CA 90295 
Phone credit card orders to: (213) 306-7412 


Overseas Distributors. 

Germany: Forth-Systeme Angelika Flesch, D-7820 Titisee-Neustadt 
UK: System Science Ltd., London EC1A 9JxX 

France: Micro-Sigma S.A.R.L., 75008 Paris 

Japan: Southern Pacific Ltd., Yokohama 220 

Australia: Wave-onic Associates, 6107 Wilson, W.A. 


Circle no. 55 on reader service card. 
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Testing Memory Models 

All the benchmarks mentioned were compiled and run 
under the small-memory model. To see what kind of per- 
formance penalty you pay to use other models, we com- 
piled and ran array( ), pointer( ), and psieve( ) with every 
other memory model option available with each compiler. 
In retrospect, we probably should have included fibtest( ) 
and maybe sieve(_) in the set. 


Benchmark Results 

You can see the results for all these benchmarks in Table 
3a (page 34) and Table 3b (page 38). Since there are 
some surprises and discoveries that may not jump out at 
you from all those numbers, we want to discuss some of 
the more interesting (in some cases, bizarre) results. 
We'll discuss them by functional grouping. 

In the area of screen I/O, none of the compilers was so 
fast as to indicate that the library routines were writing 
directly to screen memory (which could be a portability 
problem), but there was a wide range in performance. 
The compilers seemed to separate into two groups. Mark 
Williams’ compiler was the fastest in a group clustered 
around 30 seconds, with MicroSoft’s the fastest in a group 
clustered around 55 seconds. This suggests the use of two 
divergent methods of handling screen I/O under MSDOS. 

Also, we were surprised to find that for most compilers, 
prtf( ) was not much slower than scroll( ). We had ex- 
pected the conversion overhead to be significant, but this 
was true only with Computer Innovations’ compiler and, 


-to a lesser extent, with DeSmet’s. A real anomaly was 


Digital Research’s compiler, whose prtf( ) time was faster 
than scroll( ) and even faster then fillscr( )! That means 
that in DRI’s compiler there is some overhead associated 
with using puts( ) that is avoided in using printf( ); this 
made no sense to us. 

The storage class tests basically tested the efficiency of 
loading data from memory. Since there are only a limited 
number of ways to load a two-byte quantity from memory, 
it is not surprising that there were many-way ties in this 
category. In fact, except for the two slowest compilers (c- 
systems’ and Software Toolworks’), all the compilers were 
closely ranked for all three tests. There were four compilers 
tied for first, followed by two more just a couple of seconds 
slower and five more tied a bit further off. Mark Williams’ 
and Control C’s compilers were the two tied in the second 
group, but that’s no surprise; they tied in every test. They 
are really the same compiler. 

If we compare the regtest( ) and autotst( ) results, it 
becomes clear that all the faster compilers implemented 
register variables, while generally the slower compilers 
did not. The c-systems compiler, the slowest for these 
tests, did implement register variables, but apparently to 
no great advantage. Out of curiosity, we also ran a version 
of regtest( ) that declared only two of the four loop vari- 
ables to be of register class. For all compilers, the results 
were the same as for regtest( ). This was educational: it 
means that, at most, only the first two variables declared 
were actually kept in registers. This has implications for 
programming practice: use register declarations, but take 
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care that variables be declared with the most frequently 
used first. 

For all compilers, the automatic storage class is more 
efficient than the static. This may come as a surprise to 
those accustomed to C on 8-bit machines with no stack- 
relative addressing mode. 

Most compilers performed about the same on the 
looptst( )benchmark—about 60 seconds. The Aztec com- 
piler, however, was significantly faster at 38 seconds. It is 
unusual that no one else came close to this time, since most 
benchmarks had several compilers within a few seconds of 
the fastest time. It turned out that the Aztec compiler gen- 
erated only two instructions for the empty inner loop, 
whereas the best the others could do was three instructions. 

The Aztec compiler repeated this performance on the 
array( ) test, coming in twice as fast as the nearest compet- 
itor. Here Aztec’s performance was due to avoidance of the 
imul instruction in doing subscript arithmetic. In general, 
the Aztec compiler avoided imul in favor of shifts and adds 
wherever possible. The Aztec compiler also shared the lead 
in the pointer( ) test with MicroSoft’s and Wizard’s. 

There were no surprises in the tint( ) test. Except for 
Software Toolworks’ C, all the compilers were in a very 
narrow range, clustered around 35 seconds. There are not 
many ways to add or subtract two 16-bit integers on a 16- 
bit machine, and we did not use register declarations in 
tint( ), which would have given a slight edge to the com- 
pilers that support them. 

Tlong( ) is another story altogether. The Datalight 
compiler had its only win here (by a significant margin) 
at 88 seconds, followed by MicroSoft’s and then the Aztec 
compiler. The real standout in this benchmark was Digi- 
tal Research’s compiler, which came in last by an as- 
tounding margin with a benchmark of 808 seconds! It is 
hard to imagine how it could execute this slowly, over nine 
times as long as the fastest time. It is especially puzzling 
because the DRI compiler was a respectable performer 
otherwise, in fact fastest or essentially tied for fastest on a 
number of the other tests. If you use longs very much, 
DRI’s is clearly not the compiler of choice! 

The results of the optimize( ) benchmark are difficult 
to interpret. Some of the “lightweight” compilers ran this 
test quite well, while MicroSoft’s did rather poorly, even 
though we had observed that its optimization was gener- 
ally very good. Also, the Lattice compiler was fastest by a 
large margin on this test but was not an outstanding per- 
former on any of the other benchmarks. We looked at the 
code generated by some of the compilers for a clue and 
discovered a partial answer. Optimize( ) was especially 
unkind to those compilers that do not recognize that mul- 
tiply operations can be replaced by left shift instructions. 
One saved imul instruction can make up for a lot of re- 
dundant load and store operations! Actually, this kind of 
test should always be approached with caution. One of 
these days a compiler may come along that is so good at 
global optimizations that it notices when our benchmark 
functions produce no side effects visible outside the func- 
tion. It might then be free to replace an entire function 
with a single RET—very fast indeed! 
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Turbo Pascal Programmers 


The most comprehensive screen management and display 
system on the market, bar none, now speaks Turbo. 


Full keyboard editing features 
Mono and graphics display support 
Time/date (dynamic) display option 
128 fields per screen, 30 screens per file 
40 function and 20 interrupt keys per screen 
NumLock, CapsLock, and Scroll status display 
Validity check, multiple ranges & values per field 


S3-TScreen is a friendly post-processor for IBM’s Ap- 
plication Display Management System. (IBM’s PC-DOS 
languages, BASIC, PASCAL, COBOL, FORTRAN, and 
Assembler, already interface with ADMS.) 

S3-TScreen generates ADMS linkage for Turbo by 
writing two sources files, an INCLUDE file and a (very 
small) main program, which can be immediately compiled 
and executed. One FUNCTION call clears or displays the 
screen of your choosing. Screen input is accessible to your 
Pascal code by individual variable, via field names assign- 
ed in ADMS, and by record. Just add your application 
code to the main program. 


S3-TScreen is $29.95. Master Card is accepted. 


Social & Scientific Systems, Inc. 
Attention: $3-TScreen 
7101 Wisconsin Avenue, Suite 610 
Bethesda, Md. 20814 


301-986-4870 





Circle no. 124 on reader service card. 


Introducing SMK, the 


SEIDL MAKE UTILITY™ 


When we at S.C.E. needed an MS-DOS make utility for in-house 
use, we couldn't find one that did everything we needed... so we 
wrote SMK. Now we are offering SMK at a fantastic introductory 
price! 


Advanced SMK features include: 


® Proprietary dependency analysis algorithm analyzes all 
dependencies before rebuilding any files. 


e SMK understands complicated dependencies involving 
nested include files and source and object code libraries. 


e High-level dependency definition language makes setting 
up dependencies easy. Supports parameterized macros, 
local variables, constants, include files, command line 
parameters, line and block comments. 


e Batch source code editor that allows automatic source file 
updating is included. 





® FAST! SMK can analyze hundreds of dependendies in just 
seconds. 


e Typeset user’s manual and excellent error diagnostics 
make SMK easy to learn and easy to use. 


Why waste valuable product development/maintanance time 
doing work that SMK can do for you? Order SMK today! 


SMK Introductory price, save 40%: $84.00 
SMK List price (effective Jan 86): $140.00 
(include $3.50 postage & handling) 


Multi-site License 
Dealer Inquires 
Educational Discounts 
Seid! Computer Engineering 


1163 E. Ogden Ave., Suite 705-171 
Naperviile, IL 60540 (312) 983-5477 


Circle no. 114 on reader service card. 
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The disk I/O benchmarks were really testing part of 
the library, not the compiler, so we expected a wide range 
of numbers. What we did not expect was that for many of 
the compilers, cpychr( ) would be faster than cpyblk( ). 
When you look at Table 3b, don’t overlook the loop count: 
cpyblk( ) moved twice as many bytes as cpychr( ). The 
MicroSoft compiler had the fastest time for cpyblk( ), 
with no other compiler coming close. The Aztec compiler 
was fastest for cpychr( ), with Computer Innovations’ the 
only close second. The Software Toolworks compiler was 
abysmally slow on both of these, about four times slower 
than the generally poor-performing compiler from c-sys- 
tems. On the other hand, the Toolworks compiler gave a 
reasonable time for diskio( ), while the fastest time, by a 
wide margin, was turned in by c-systems’ compiler. In 
fact, the compilers that generally did the best on the vari- 
ous compile-time benchmarks (those from Aztec, Micro- 
Soft, and Wizard) were among the slowest on the ran- 
dom-access diskio( ) test. You figure it out! 

The min—( ) benchmarks were intended to test the 
granularity of the library: we wanted to see how much 
unwanted ‘stuff’ would be dragged into the .EXE file 
along with the library functions actually being called. 
Minmain( ) contains no function calls at all, so the .EXE 
file size for this test is an indication of the best you can do. 
The DRI, c-systems, and Lattice compilers were the big 
losers here, all requiring more than 10,000 bytes of li- 
brary code to do nothing at all. Not surprisingly, these 
three were also the worst on the minputs( ), minprtf( ), 
and minfio( ) tests, although the Lattice compiler’s .EXE 
size remained about the same. The EcoSoft and Wizard 
compilers both produced amazingly small .EXE files for 
minmain( ), since the startup code should at least initial- 
ize the stdin, stdout, and stderr files. DeSmet’s, in third 
place at 1536 bytes, already includes all the library code 
needed to support the puts( ) function. That made De- 
Smet’s the smallest .EXE file for minputs( ) by a fair mar- 
gin, although Wizard’s and EcoSoft’s were also very 
small. 

Minprtf( ) was the acid test, because the formatting sup- 
ported by printf( ) usually requires the floating-point pack- 
age as well as I/O support. Some of the compilers provide 
an integer-only version of printf( ), however, and we used 
that option whenever possible since we believe the majority 
of C applications do not require floating-point support. 
The compilers that provide this option are giving you more 
flexibility with an effectively more granular library. They 
are the compilers from Aztec, Mark Williams (and Con- 
trol C), Lattice, MicroSoft, and Datalight. 

The MicroSoft compiler deserves special mention 
among these. The other compilers made you specify 
whether floating-point support was desired, either with a 
command-line option or via library-search order. Micro- 
Soft’s handled this automatically by detecting whether 
any float or double variables or pointers had been de- 
clared in your program, and then linking the math library 


only if needed. We found this sort of feature to be typical 
of the Microsoft product. 


Using the floating-point version of printf( ) typically 
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added from 2000 to 3000 bytes to the .EXE file size. 
Choosing the compile option to leave the float library out, 
Aztec C produced the smallest .EXE file by a large mar- 
gin, even over the integer-only competitors. Datalight’s 
and MicroSoft’s came next and then DeSmet’s. The De- 
Smet compiler produced the smallest .EXE file with the 
floating-point library included, although the Aztec file 
was only a few hundred bytes larger. Also, it should be 
noted that the Software Toolworks compiler is a subset 
compiler with no floating-point support at all. 

For the minfio( ) benchmark, the Datalight, Aztec, and 
EcoSoft compilers shone the brightest, with Wizard’s not 
far behind. Here DeSmet’s .EXE file was a lot larger than 
the one generated for minprtf( ), even though the float 
library was not required. This was viewed by all as very 
strange. 

The min-( ) benchmarks, except for minmain( ), are all 
significant because they give you an idea of how small a 
small program might be. Since there are very few useful 
functions to be performed that do not require some console 
and disk I/O, minmain( ) was included primarily to show 
the losers in this category in the unkindest light possible. 
The c-systems and DRI compilers did not fare well at all, 
requiring 19K and 18K, respectively to say “hello world” 
via printf( ). Lattice’s compiler, a very well thought of 
product generally, also looked none too good here. The 
Aztec compiler was the overall winner in this category. The 
Aztec compiler also had the smallest execution-time 
benchmark files, requiring only 14K for benchall.exe ver- 
sus an average of SSK-65K for the others. 


Memory Models 
The 8086’s segmented architecture leads to some trade- 
offs between execution speed and addressing range. The 
way a compiler views the 8086’s address space is called 
the memory model. All the compilers reviewed here sup- 
port the so-called “small” memory model as the default, 
and many of them allow no other. The small model allows 
up to 64K for instructions and 64K total for all kinds of 
data: heap, stack, statics, and globals. Automatic vari- 
ables are allocated on the stack, with space dynamically 
allocated via malloc( ), etc., coming from the heap. 
Other possible models are called different things by 
different manufacturers. Lattice, Aztec, c-systems, Wiz- 
ard, and Microsoft all provide a model in which code (in- 
structions) can run up to a megabyte (the maximum al- 
lowed by the 8086), but data is limited as in the small 
model. Lattice, Aztec, c-systems, and Wizard provide a 
model that limits code as in the small model, but the heap 
may extend to a megabyte, the stack can grow to 64K, 
and statics and globals together can take up 64K. DRI and 
Computer Innovations, in addition to the just-mentioned 
four, provide a model allowing code up to a megabyte and 
data as in the preceding model. Wizard and Microsoft 
have a model that extends this last model by allowing 
more than 64K of combined statics and globals (although 
no single item may be greater than 64K), in addition to 


the one-megabyte code and heap spaces; the stack is still 
limited to 64K. 
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Vendor tft tdbl EXE size 8087 inline Notes 
8087 series: 
Aztec (Manx) 1191 {410 7584 Y NN ms/i 
Aztec (Manx) 149.1 1685 10000 N N_- m87s.lib 
c-systems $450 i537 22424 Y NW 
c-systems 599 683 20956 oN Y PROGRAMMER’S UTILITIES 
Computer Innovations 59.2 68.3 10027 NY : especially for Turbo Pascal on 
DeS 
met 1190 1283 12288 N_ N= stdio7.s 
Ecosoft 290.5 161.7 10828 Y N MORE POWERFUL THAN UNIX UTILITIES! 
Lattice 1675.8 12560 17452 Y N_ didn't use 8087 These Ready-to-Use programs fully support Turbo Pascal 
Mark Williams §3.7 629 9632 N Y?. -rndp -vsmall versions 2.0 and 3.0, and PCDOS 2.X and 3.0. Here’s what 
Microsoft Bi0 86497 21172 YY N~ fice Pretty Printer meee 
Microsoft 81.0 896 14148 N N Mpc87 Standardize capitalization, indentation, and spacing of 
Microsoft $3.7 64.2 20932 y ¥ /fpi source code. Don't waste your own time! Several adjustable 
Microsoft 55.6 642 13908 N y /{pi87 ee your tastes (works with any standard 
Wizard 3500 2090 11788 ¥ N | 
Program Structure Analyzer 
Wizard 368.7 720 11916 N YY dad Find subtle problems the compiler doesn't: uninitialized and 
Floating-point series: ee in ee hcectethae Seen seahy 
Ariec (Maat) 7B R 810 9136 N me? lib variable modification, redefined standard identifiers. Also 
generates a complete variable cross reference and an execu- 
Aztec (Manr) 806 83.2 10000 y m&7s lib tion hierarchy diagram. Interactive or write to file (works 
c-systems 95.1 FRG 27424 Y with any standard Pascal source). 
Computer Innovations 173.1 166.0 11453 N pponnine ay scat ts oleae 
: in a summary of time spent in each procedure an 
Datalight 121.8 71.1 10068 N function of your program, accurate to within 200 micro- 
DeSmet 97.8 79.2 14848 N cn Also counts number of calls to each subprogram. 
Digital Research 836 617 22016 N pi fen ake 
EcoSoft 129.6 105.8 10878 Y Bete rete where your program spends its 
Lattice 112.0 84.2 17452 ve time. Interactive, easy-to-use. Identify weak code at the in- 
Mark Williams 988 943 13137 N en Bes (Profiler and Timer for Turbo Pascal Source 
Microsoft 917 1019 21172 Y /fpc thr 
Microsoft 256 456 16580 ~ N Nes pemnninl Repeater 
' : ¥ Customize any operation by reading and parsing the stan- 
Microsoft 926 1026 20932 y /fpi dard input. Send up to 255 keystrokes to any executed pro- 
Wizard Fia4 11786 Yy gram. Automatically generate DOS batch files. 


25.1 


The fioating-point series are with loop counts of 600, run at 7.16MHz. 

The 8087 series are with loop counts of 6000, run at 4.77 MHz. 

The rightmost column indicates whether in-line code is supported. The 
column headed “8087' indicates, for floating-point results, whether the test 
runs faster with an 8087 present, and, for the 8087 results, whether it works 
if an 8087 is not present. 


Table 4 
Floating-point and 8087 Results 


Pattern Replacer 

Find and REPLACE versatile regular expression patterns in 
any text file. Supports generalized wildcards, nesting, alter- 
nation, tagged words and more. Over a dozen programmer's 
applications included. 


Difference Finder 

Find differences between two text files, and optionally create 
an EDLIN script which rebuilds one from the other. 
Disregard white space, case, arbitrary characters and Pascal 
comments if desired. 


Super Directory 

Replace PCDOS DIR command with extended pattern 
matching, sort capability, hidden file display, date filtering, 
and more. 


File Finder 
Locate files anywhere in the subdirectory tree and access 
them with a single keystroke. Display the subdirectory tree 


Documentation and Support: grapnicaly. 
Vendor Usability Readability Support AVAILABLE IN SOURCE 
Aztec (Manz) 2.83 3.72 1.88 AND EXECUTABLE FORMAT 
Control C 3.17 2.87 1.56 Executable: $55 COMPLETE including tax and shipping. 
c-systems 2.50 2.53 2.19 Compiled and ready to run, includes 140-page printed user 
Computer Innovations 317 2 83 2.50 manual, reference card and one 514” DSDD disk. Ideal for 
Oataliont 100 103 63 programmers not using Turbo. NOT copy protected. 
— 2 5 4h Source: $95 COMPLETE including tax and shipping. 

DeS met 2.33 I 3. Includes all of the above, and two additional DSDD disks. 
Digital Research 30) 2.58 4.06 Disks include complete Turbo Pascal source code, detailed 
EcoSoft 2.17 2.05 1.56 programmer's manual (on disk) and several bonus utilities. 

a: equirements: X or 3.0, Vi — programs 
Mark Williams 3.17 2.87 1.88 run in less RAM with reduced capacity. Two drives or hard 
Microsoft 4.67 4.02 ats disk recommended. 
Wizard 3.33 2.85 4.38 VISA/MasterCard orders, call 7 days toll-free 1-800-538-8157 
Interpreters: x830. In California, call 1-800-672-3470 x830 any day. 
C-terp 250 183 63 Or mail check/money order to: 
Instant C 3.00 i.25 1.56 TurboPower Software 
Run/C 2.50 3.87 94 478 W. Hamilton Ave., Suite 196 

Campbell, CA 95008 
Table 3 For technical questions, call 408-378-3672 


Documentation and Support 
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Epsilon 
The Emacs-Like Text Editor For 


Programmers Who Don’t Like to Wait!! 
State of the Art Text Editor 


Epsilon is an exciting new text editor designed to make 
programmers more productive. Epsilon is faster than Brief, 
faster than Mince, faster than Gosling Emacs, and faster 
than the editor you’re using now! 


Concurrent Processes! 

Epsilon lets you compile while you edit! You can run 
compilers, assemblers, linkers, and almost any other 
program that isn’t screen oriented, all under Epsilon’s 
control, while you edit your files! 


With Epsilon you don’t wait for programs like compilers 
to finish. Use Epsilon’s concurrent process command, and 
while the compiler runs, you can continue to examine 
and edit files. Any errors in the compilation are displayed 
immediately, and Epsilon gives you the opportunity to 
correct them while the compiler continues to run. With 
Epsilon, you’re finished correcting errors when other 
editors first let you start. 


Powerful Commands 

Epsilon has over 125 commands instantly available. Epsilon 
can manipulate words, sentences, and paragraphs easily. 
Epsilon will automatically save text you have deleted in a 
“ring” of kill-buffers, so that you can retrieve it later. It 
will help you avoid syntax errors by displaying matching 
parentheses. And best of all, Epsilon’s macros let you 
define your own commands, which can be loaded 
automatically each time you start Epsilon. 


Speed with No Limits. 

Epsilon reads and writes files 25% to 600% faster than 
competing editors. From its convenient keyboard macros 
to its facility that completes the names of commands, files 
and buffers, to its optimized incremental search, Epsilon 
has been designed for programming ease and speed. 


There’s no limit to the number or the size of buffers you 
can have. Each buffer can hold a different file, or different 
versions of the same file. You can create as many windows 
as will fit on the screen, and display different buffers in 
each. And should you run out of memory, Epsilon will 
create and automatically utilize a swap file. 


Speed Comparison (In Seconds) with Other Editors 


The Wizard and Lattice compilers each have an option 
that permits the compiler to generate much better code 
for the large models, if the programmer is willing to live 
with certain restrictions regarding pointer arithmetic. 
These two compilers also allow very small programs to be 
changed to .COM files. Such programs must fit all code 
and data into 64K. 

Microsoft is currently the only one of the 13 reviewed 
manufacturers supporting ““mixed-model” programming, 
although others indicate that it is high on the to-do list. 
Mixed-model programming allows certain pointers to be 
declared “near” or “far,” allowing you to use a pointer 
from a model different from the model of the rest of the 
program. You can write a program that uses the small 
model with its speed benefits and make only certain point- 
ers of the time-consuming “far” variety to gain access to 
very large arrays. 


Floating-Point and 8087 Support 

Although C is presently most often applied to problems 
that don’t require any floating-point arithmetic, the lan- 
guage does support and define the use of “‘real’’ numbers. 
Of the 13 compilers reviewed (see Table 4, page 43), all 
but one, Software Toolworks C, support floating-point 
math, and Toolworks expects to have it available by the 
time you read this. 

The remaining 12 all support both float and double 
data types as 32- and 64-bit quantities, respectively. 
Nearly all use the IEEE floating-point standard to repre- 
sent float and double. This makes it relatively easy to take 
advantage of an 8087 math chip (which also uses the 
IEEE standard). Datalight’s is the only compiler we re- 
viewed that did not offer any way to take advantage of the 
8087. Lattice’s compiler documentation indicated that its 
library was “sensing, but our results indicated that it did 
not use the available 8087. 

A sensing library is a library of floating-point functions 
that use the 8087, if one is present, and do the required 
operations in software if not. This means that you, the 
programmer, don’t have to know in advance if your pro- 


eee oe Ae anes gram is going to run on a machine with an 8087. 
Start-up 2.60 4.11 1.43 24.93 ; ; ‘ 
Read 24K file 1.08 1.33 8.95 759 Another way of supporting an 8087 is to use a library 
Write 21K file 2.11 14.30 6.05 7.95 that requires the presence of an 8087. Compared to the 
Next Screen 19 24 1.33 1.80 sensing library, this buys you a little time (the time the 
String Search 3.85 7.04 4.49 8.41 : s . ) 
Bparch 3 85 oe = 873 sensing library takes to decide whether there’s an 8087 for 
First Help 8.30 12.33 -- a it to use) and some 2K-—7K of code (the software floating- 
Other Helps .20 11.64 -- 


Epsilon runs on IBM PC’s, XT’s, AT’s and compatibles with 
PC-DOS 2.0 or above and requires 192K of memory. 


Epsilon’s price is only $195.00. 
ALL MAJOR CREDIT CARDS ACCEPTED. 





Lugaru Software, Ltd. 
5227 Fifth Avenue, Suite 12 / P. O. Box 110037 
Pittsburgh, Pa. 15232 


(412) 621-5911 


Circle no. 6 on reader service card. 


point routines). Or you can generate 8087 instructions in- 
line like integer operations. This saves the time needed to 
make the function call. 

It is possible to execute an 8087 instruction in a machine 
not having an 8087. What happens is that the 8086 traps to 
a user-provided interrupt routine. This routine may emu- 
late the 8087 and return. This allows the compiler to gener- 
ate in-line instructions and still not require an 8087, but to 
use one if it’s available. Only Microsoft’s compiler imple- 
ments this type of an emulation scheme. 


Documentation 
We reviewed all documentation and packaging for each 
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compiler. To be consistent, we developed “benchmarks” 
for documentation, with a grading system consisting of two 
main categories: usability and readability. 


Usability 

The usability category covered the overall packaging of 
the documentation: the organization and quality of pre- 
sentation that make the documentation easy or difficult 
to use. The items that contributed to the usability score 
were the following: 


¢ Packing list (P/L): Was a list of all manuals, disks, etc., 
included so that you could confirm that you had received 
everything? 

e Disk contents (DISK): Was a list of all disks and their 
contents included? Often one was included, but buried in 
the manual and hard to find. 

e Binding (BIND): How was the documentation received 
from the vendor? We saw everything from loose pages 
(not even clipped or stapled) to multiple 3-ring binders in 
attractive cases. 

¢ Table of contents (TOC): Was there one? How complete 
was it? 

e Index (INDEX): Was an index included, and how com- 
plete was it? Believe it or not, some vendors don’t want 
you to locate anything in the documentation, as proven by 
the fact that they don’t index their manuals! 

e Error codes (ERR): Was a list of error codes generated 


by the compiler present, and how useful was it? 

¢Startup (START): Was a getting-started section sup- 
plied for those who need this level of support? Also con- 
sidered here: the quality of instructions on batch files for 
installation, sample “test” programs to try out the com- 
piler, and sample batch files for operation. 

¢ Operation (OPER): Was a compiler-operation section 
included, how complete was it, and could you find each 
compiler option without rereading the entire section? 

¢ Libraries (LIB): Was a section describing the libraries 
supplied, and how easy was it to find a particular func- 
tion? This is where a good index helps, but at least the 
functions ought to be in some order, not at random! The 
CI-86 compiler included a brief summary of the functions 
in its table of contents—bravo! 


Readability 

Readability pertained to clarity of presentation and to the 
ease with which the material could be understood. To es- 
tablish some method of consistent grading, we picked 
three library functions and subjectively graded the pre- 
sentation on each function across all compilers. We 
picked fopen( ), fread( ) (where supported), and printf( ). 
We looked for such things as good examples, clear defini- 
tion of all parameters, clear definition of return values, 
error returns, notice of deviation from standards, and a 
good explanation of the function. We also gave credit if 
only one function was printed on a page, making it easier 


Time and Money. 


We've just done something we know you'll like. 
We’ve made the SemiDisk far more affordable than 
ever before. With price cuts over 25% for most of 
our product line. Even our new 2 megabyte units 
are included. 


It’s Expandable 


SemiDisk Systems builds fast disk emulators for 
more microcomputers than anyone else. S-100, 
IBM-PC, Epson QX-10, TRS-80 Models II, 12, and 16. 
You can start with as little as 512K bytes, and later 
upgrade to 2 megabytes per board...at your own 
pace, as your needs expand. Up to 8 megabytes per 
computer, using only four bus slots, max! Software 
drivers are available for CP/M 80, MS-DOS, ZDOS, 
TurboDOS, VALDOCS 2, and Cromix. SemiDisk 
turns good computers into great computers. 


SEMIDISK 





SemiDisk Systems, Inc., P.O. Box GG, Beaverton, Oregon 97075 


Battery Backup, Too 


At 0.7 amps per 2 megabytes, SemiDisk consumes 
far less power than the competition. And you don't 
have to worry if the lights go out. The battery 
backup option gives you 5-10 hours of data 
protection during a blackout. Nobody else has this 
important feature. Why risk valuable data? 


The Best News 


512K Mbyte 2Mbyte 
SemiDisk I, S-100 $695 $1395 
SemiDisk II, S-100 $995 $1995 
IBM PC, XT, AT $595 $1795 
Qx-10 $595 $1795 
TRS-80 II, 12, 16 $695 $1795 
Battery Backup Unit $150 $150 $150 


Someday you'll get a SemiDisk. 
Until then, you'll just have to....wait. 


& i Baas 
Later irs ers] fe! VISA 
Bees 


503-642-3100 


Call 503-646-5510 for CBBSYNW. 503-775-4838 for CBBS/PCS, and 503-649-8327 for CBBS/Aloha, all SemiDisk equipped computer bulletin boards ( 300/1200 baud) SemiDisk, SemiSpool trademarks of SemiDisk Systems. 


Circle no. 85 on reader service card. 
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to find and read. Cop-outs such as “see K&R for descrip- 
tion of this function” sat very poorly with us. 


Table 5 (page 43) shows the numerical scores we ar- 
rived at for documentation. The Microsoft manuals were 
the best on virtually every point. The Wizard, Lattice, 
and DRI manuals should be usable over the long run, and 
the Aztec book was very readable. 


User Support 
The best software product is of marginal value if it is not 
well supported. We attempted to review the kind and quali- 
ty of user support available for the compilers reviewed. 
This included contacting support groups for most of the 
compiler publishers to evaluate their responsiveness. 
Although you should not expect the same level of sup- 
port for an MSDOS compiler as you might for a compiler 
running on a large mainframe, some of the same support 
features should be available. Ideally, support should re- 
flect some modularity, so those who need full support can 
obtain it, while those who need only occasional assistance 
don’t have to pay for support they won’t use. We attempt- 
ed to evaluate user support based upon several criteria 
that we determined to be important. The numerical re- 
sults are shown in Table 5. Here is a discussion of the 
criteria. 





Bug List 

Most of the compilers did not have available a current list 
of known bugs. Some did indicate problems known but 
not yet fixed as of a particular release, either in a read.me 
file or in the documentation. Ideally, what we wanted to 
see was a regular update describing current bugs, the ex- 
pected fix date, and any work-arounds. This would be a 
big help at two in the morning when you are under pres- 
sure to complete a big project, but are stopped dead by a 
compiler bug. It also ought to help the customer service 
group by reducing the number of times the same bug is 
reported. 


Registration 

Most vendors supplied a means to register the compiler so 
that the buyer could receive notices of future releases. 
Some were even postpaid. We had no means of verifying 
that new release notices would appear in the mail, but 
past experience indicates that sometimes such notices are 
sent and sometimes not, depending on the vendor. 


Update Subscription 

Only one vendor (Wizard) offers a fixed-price annual 
subscription-service for all bug fixes and updates. Many. 
others indicated that updates were available but were 
charged on a per-update basis. The Wizard approach has 


SOMEBODY HAS BEEN DOING SOMETHING TO ANSWER YOUR 





Once again VersaSoft is answering your 
dBASE needs with the FIRST WORKING dBASE 
compatible multi-user database manager for local 
area networking. 

When Ashton-Tate introduced Multi-User 
dBASE Il over a year ago, it crashed in flames. 
Since then none of the dBASE-compatible vendors 
have even talked about networking. If you’re 
waiting for dBASE Ill, dB/Compiler, cEnglish, 
FoxBase Il or Clipper to answer your networking 
needs, you may be in for a long wait. Now, 
VersaSoft has succeeded where others have failed, 
or haven'teven started... with dBMAN-Net™. All the 
advanced features of dBMAN-Net™ make the 
elusive promise of networking a reality, today! You 
may have been tantalized by a product announce- 
ment before, only to find out it will be months before 
the product is on the market. By contrast, dBMAN- 
Net™ has already been field proven, in fact, several 
commercial on-line database systems have been 
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using it reliably for months. The performance has 
proven to be excellent and dBMAN-Net™ is fully 
compatible with the single-user dBMAN™. 
dBMAN-Net™ provides all the tools you need 
to attack any networking database applications: 
Record and file locking; semaphore locking; lock- 
ing many records from one file and/or from 
different files as a “set”. (All the records you specify 
are either locked or nothing is locked, avoiding 
deadlock.) dBMAN-Net™ also locks, unlocks, and 
updates the index files automatically, all you do is 
lock the database and dBMAN-Net™ does the rest! 
Existing dBASE programs are easily converted to 
multi-user with two simple new commands, 
DENYRW and UNDENY. Simply use DENYRW to 
lock the record before the REPLACE command 
and use UNDENY to unlock the record. dBMAN- 
Net™ also provides dBASE programs full control 
over error trapping and recovery. A printer output 
can be queued and spooled to the file server and 


different print jobs can be printed in an orderly 
manner on any of three shared printers. dBMAN- 
Net™ is the only networking database with full print 
server support built in so you control everything 
from banner text, copies, tab expansion and printer 
to form selection. 

dBMAN-Net™ runs on Novell NetWare v4.6x 
Local Area Networks, the IBM PC, XT, Portable, AT, 
and is compatible with 256K RAM. NetWare 
support is available for most LAN hardware in- 
cluding Gateway, IBM, 3Com, Orchid, and many 
others. 

dBMAN-Net™ comes with a site license with 
NO ADD-ON CHARGE, allowing more users as 
your network grows. Run-time module is now 
available and the site license for it is just $150.00 
per network. 

VersaSoft provides you with a full line of 
database products to fill your application require- 
ments, including single user dBMAN™ dBMAN™ 
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etc 


appeal: it’s simple, and you should receive updates faster, 
with less paperwork at both ends. 


Phone Consultation 

Phone-in consulting service was available from all ven- 
dors, but some vendors required a serial number to gain 
access and others required money before giving the buyer 
a phone number to call. Although it is certainly not un- 
reasonable to charge for support, many vendors bundle 
phone support into the basic product. We found that some 
vendors restricted calling hours. 


Support Quality 

All the reviewers made notes when they called vendors for 
support, and the documentation group also attempted to 
contact the support personnel for each vendor. We found a 
wide range in quality of support. Sometimes we were re- 
ferred to the author of a compiler. That should get you 
qualified technical support, but we felt it to be a negative; it 
meant the technical support was dependent on one person, 
and if that person is unavailable, you’re stuck. On the other 
hand, talking to a “support person” who doesn’t know C 
makes one very uneasy. We found that the support team at 
Wizard offered by far the best technical assistance. 


support. The clear winners here were Wizard’s, DRI’s, 
DeSmet’s, and Microsoft’s compiler support. 


Compiler-specific Comments 

The following comments, arranged by compiler, elabo- 
rate on the major items not already discussed or easily 
discernible from the tables: the quality of the documenta- 
tion, standards issues, user support, overall benchmark 
performance, and summary remarks. 


Aztec C86 

Aztec C86 was easily one of the fastest compilers overall 
and handled array referencing more efficiently than any 
other compiler. Our results indicated that its library pro- 
vides a lot of flexibility, allowing you to generate small 
.EXE files. It was the best in this area. The Aztec compiler 
provides an integer-only version of printf( ). There are 
several large-memory models to choose from. A make 
utility is included. 

There was a general problem with the benchmarks: the 
main( ) routines used a cast to produce a null pointer to 
function returning an int — (int (*)( )) 0. Some compilers 
could handle it; many others couldn’t. Aztec C86 couldn’t 
handle this function cast in main( ), but it gave an excel- 


In Table 5 you see an attempt to assign numbers to our | lent error message when it tried. 
experiences with the vendors in these areas of technical 


The Aztec manual had one major problem: it has no 


dBASE NEEDS. VERSASOFT IS PROUD TO ANNOUNCE dBMAN-NET. 
dBMAN-NET 


YOU'VE BEEN IN THE DARK LONG ENOUGH. 





run-time, multi-user dBMAN-Net™ and dBMAN- 
Net™ run-time. Furthermore, Versasoft products 
are NOT copy protected and all products are 
available NOW. 





dBMAN-Net™ v1.04 

Interpreter (Unlimited Users) — $1,100.00 

Run-time Developer Package (Interpreter, Code 
generator and Site License) — $1,300.00 

Run-time Code Generator (Interpreter is a pre- 
requisite) — $200.00 

Run-time License (Unlimited Users) — $150.00 


dBMAN™ v1.04 


Interpreter — $292.00 
Run-time Code Generator (Interpreter is a Pre- 


| 
| requisite) — $150.00 







ERSA 
OFT. VersaSoft Corporation 


723 Seawood Way, San Jose, California 95120 (408) 268-6033 
Telex 6502635806 (Via WUI) Answer back MCI 


Circle no. 120 on reader service card. 


Run-time License (optional) — $20.00 


dBase, dBASE II and dBASE Il are trademarks of Ashton-Tate cENGLISH is a Trademark of cLINE 
dB/Compiler is a Trademark of WordTech Systems Clipper is a Trademark of Nantucket 
FoxBase Il is a Trademark of Fox Software 
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index. Otherwise it rated above average, though we 
thought it needed more white space for readability. Aztec 
did include a section on making your code ROMable, very 
useful to some, and it had good examples in the library 
descriptions, although these tended to describe more than 
one function at a time. This does save repeating the same 
text over again, but it makes it a little difficult to extract 
specifics about a particular function. A new manual is 
available (received too late for review); among the utilities 
included are editor, debugger, make, Aztec to .OBJ format 
converter, CRC utility, archiver, squeezer, grep, and hex 
generator. 


Control C CC-86 

Control C’s compiler is a copy of Mark Williams C 
(MWC), documentation and all, so we'll refer you to our 
comments on MWC. Apparently, Control C is doing the 
port of the Mark Williams compiler to CP/M-86 and, as 
part of the arrangement, is able to provide the MSDOS 
version to the outside world. The only comments we’ll 
make specific to the Control C compiler are that one of 
the six disks in the original package we received had a 
defect and that the Control C package did not include the 
function-key pad overlay for the debugger, as the Mark 
Williams package did. 


c-systems 8088 Software Development Package 
Although generally slow, the c-systems compiler turned 
in the fastest time in the disk I/O test. It did not do well in 
tests of generated-code size. c-systems provides several 
large-memory models. The c-systems compiler does not 
support fgetc( ) in stdio.h, even though fputc( ) is sup- 
ported. Consequently, fgetc( ) was coded as a module, 
rather than as a macro, using getc( ). 

The c-systems manual contained a neat trick for compil- 
ing multiple modules using wildcards. Other compilers 
support wildcards in the command line; c-systems uses the 
for batch command from the command line. For example: 


A> for %f in (min*.c) do cc %f 


This technique can be used with any compiler. c-systems’ 
compiler was about average in the area of documentation. 
It didn’t include a binder, and the print quality was only 
fair. The installation section was too brief, but the opera- 
tion section was well done. It did include a detailed list of 
differences from the standard, something many did not. 
The library descriptions lacked examples and could use 
more information on return and error values. There were 
problems using drivers; occasionally they would not run for 
no apparent reason and they only used the first 128 bytes of 
the environment string so the INCLUDE variable was not 
always findable; the compiler has PL/M compatibility. 


Computer Innovations Optimizing CI-86 

The CI-86 compiler performed in the middle range on 
nearly all the benchmarks, walking away with the co- 
pychr disk I/O test. One nice feature of the CI-86 compil- 


the operating system. For instance, you can initialize and 
release interrupt routines such as might be required for 
writing a communications program. 

Computer Innovations provides a large-memory model, 
although when we used it, it would not allow pointer 
arithmetic on a multiply-dimensioned array across di- 
mensions. The documentation explains this strange be- 
havior, stating that without the functions that convert 
pointer to long (ptrtoabs( )) and long to pointer (ab- 
stoptr( )), ‘‘big-model pointer arithmetic assumes the 
data segments are the same for the pointers.” The compil- 
er did give a reasonable error message when an input data 
file was not found. The CI-86 compiler doesn’t allow + + 
or — — on float or double variables. For example: 


double d;d+-+:; 
did not work, while 
double d;d += 1; 


did work. 

We judged the Computer Innovations manuals above 
average. They included a good approach in the table of 
contents: a one-line description of each library function, 
serving as a quick-reference guide. Their library descrip- 
tions were well done, with examples and notes on DOS 
applicability. The compiler-operation section was too brief, 
and no listing of compiler error messages was included. 


Datalight C 

The old MSDOS Small-C compiler distributed by 
Datalight was a port of the public domain Small-C com- 
piler for CP/M. The new C Compiler, which is a full 
implementation of the C language, stood out in a number 
of areas. It came in first or tied for first on several tests, 
standing in a class by itself on the long-arithmetic bench- 
mark. Datalight provides an integer-only version of 
printf( ). 

The Datalight compiler appears to implement real 
block scope for declarations. Function xmalloc( ) was de- 
clared as extern char *xmalloc( ) inside main, and this 
declaration was not in force in later functions, leading to a 
“definition inconsistent with prior use” error when the 
function was called. We view this as appropriate, but it is 
not clear what behavior K&R calls for, and most of the 
other compilers did not catch this error. 

The Datalight compiler could not compile the global 
definition 


char null_strg[ ] = {“”’}; 
It had no problem when it was changed to 


char null_strg[1] = {“”’}; 


The documentation that came with the new Datalight 
compiler was a significant improvement over the previous 


er is that numerous paths are provided for interfacing to | version, as was the compiler itself. The packaging was still 
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low-budget, like the compiler—56 8'4-by-11 spiral-bound 
pages with small, difficult-to-read print. All the essentials 
were there, though. There was a usable table of contents 
and an index, the few supported error messages were all 
described, there was a setup section with a sample pro- 
gram, and some of the function definitions included ex- 
amples. Overall, not bad for a $50 compiler. 


DeSmet C 
The DeSmet compiler was generally mid-range in speed, 
coming in above average in the screen I/O tests and losing 
the floating-point math test. It produced the smallest 
.EXE files in certain of the code-size tests. The compiler is 
supported by a good user group, and there was a bug list. 
No error message was produced when an input data file 
was not found—the compiler just went to sleep! DeSmet’s 
compiler does not like really long comments; an error 
message was generated at line 28 after the opening /*. 
DeSmet’s manual is a low-budget product. Its pages 
were not bound nor even stapled; they lacked an installa- 
tion section, and although the DeSmet package supplied a 
lot of software, nowhere is there a list of what you should 
have received in the package. The manual also omitted an 
index and didn’t organize the functions as we would have 
liked, with one function on a page. The descriptions were 
brief, but they did include examples. 


Digital Research DRI C 

Although the DRI compiler was among the faster overall, 
it dawdled through long arithmetic. The compiler per- 
formed poorly on the tests of library granularity. DRI 
provides a large-memory model, and DRI’s support got 
high marks. 

DRI’s compiler had no problem with the function cast 
in main( ). No timer function and no access to DOS inter- 
rupts were provided; an assembler is required, but rasm86 
was included, and the manual documented the assembly 
and linkage process very well, including an example. Cap- 
ital letters on the command line were converted to lower 
case before being passed to main( ). 

DRI’s compiler was the only one to report an error for 
two statements in doc1000.c that defined and initialized 
global arrays. Both initialization lists included a trailing 
comma, as in: 


int array[ ] = { 1, 2, 3, 4, 
5,6, 7.3: 
}; 


The output file produced by cpyblk( ) was too small be- 
cause fread( ) returned zero instead of the actual number 
of bytes read on the final block. The block size was 1024 
bytes, so the last block would have been a short one. 
Digital Research put a good documentation package to- 
gether. They provided a reprint, in their own binding, of 
K&R. The index was good, and a nice error list appeared 
in an appendix. The getting-started and operation sections 
were well done, with good tables and examples. The library 
function descriptions could have been better organized, 
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TURBO EDITASM 


Introducing the first co-resident editor assembler for the IBM PC family. 

TURBO EDITASM (TASM) is significantly faster and easier to use than the IBM 
Macro-Assembler (MASM). Whether you are new to assembly language and want 
to quickly write a small assembly language routine, or are an experienced MASM 
user tired of waiting months to assemble large files, TURBO EDITASM will bring 
the excitement back to assembly language. 





TURBO EDITASM |S MUCH FASTER: 


¢ How fast is TASM? The graph below shows relative assembly times for a 48K 
source file. For large files like this we blow MASM'’s doors off at 3 times their 
speed. For smaller 8K files we positively vaporize them at 6 times their speed. 
TASM (110 sec.) 
MASM (340 sec.) 


¢ TURBO EDITASM is faster for the following reasons: (1) Written entirely in 
assembly language (unlike MASM). (2) Editor, assembler and source file always in 
memory so you can go instantly from editing to assembling and back. (3) Elimi- 


nates the time needed to LINK programs. Executable COM files can be created 
directly. (Also creates OBJ files compatible with the IBM linker). 


TURBO EDITASM IS EASIER TO USE: 

TASM includes many other features to make your programming simpler. 

® Listings are sent directly to screen or printer. Assemblies can be single stepped 
and examined without having to leave the editor. 

e Access the built-in cross reference utility from the editor. 

e Full support of 186 and 286 (real mode) instructions. 

e Both Microsoft and 8087 floating point formats are supported. 8087 and 287 
instructions supported directly without macros for faster assembly. 

e Calculator mode: Do math in any radix even using symbols from the symbol table. 

e Direct to memory assembly feature lets you test execute your code from editor. 

¢ Coming soon: A coordinated symbolic debugger. 


COMPATIBILITY: TASM is source code compatible with MASM and supports 


macros, records and structures. Include $5.00 shipping and 


handling. California residents 
add 6% Sales Tax. 

Dealer inquires welcome 
916-988-7426 


Introductory Price $49 
With .OBJ Capability $99 
118 Buck Circle, Box D 


™ 
Speedware Folsom, CA 95630 


IBM, Microsoft trademarks of IBM Corp., Microsoft Corp. 
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S-100 EPROM PROGRAMMER 


e Field-proven board meets IEEE-696 standard. 

e Programs 1K through 32K (byte) EPROMs. 

e Textool zero-insertion-force programming socket. 

e EPROM is programmed through |/0 ports and can be verified 
through 1/0 ports or located in memory space for verification. 

e Programming voltage generated on-board. 

e Personality Modules adapt board to EPROMs: 
PM-1—2508, 2758 PM-3—2732, 2732A 

2516, 2716 PM-4—2564 PM-8—27128 

PM-2—2532 PM-5—2764 PM-9—27256 

e Feature-packed CP/M-compatible control software includes 


fast programming algorithm. i 
e One year warranty. $269.95 
(A &T) 


PM-6—68764 


MicroDynamics 
SE TAT ES 


Corporation 


Suite 245 e 1355 Lynnfield Road « Memphis, TN 38119 
(901)-682-4054 
Price includes EPROM-32, documentation and two Personality Modules(specify). Additional 


Modules—$7.95. Control software on 8” SSSD diskette—$29.95, UPS ground—$2.00, UPS 
air—$4.00, COD—$1.65, foreign add $15.00, VISA & MASTERCARD welcome. 


See Dec. 1983 Microsystems for a review of the EPROM-32. 
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though, and should have included examples instead of di- | the source for CC, its driver program. Given that they had 


recting the reader to K&R for descriptions of functions. written a fairly good book on C, we expected good docu- 
mentation from EcoSoft. We were disappointed to find a 
EcoSoft-C very short table of contents and no index. We found the 


The EcoSoft compiler was not dazzlingly fast nor dis- | documentation difficult to use. The getting-started and 
tressingly slow on the benchmarks. It did well in the code- | compiler-operation sections were too brief. The library 
size tests, producing a remarkably small .EXE file in the | functions did not include examples and were not terribly 
minmain( ) test. The library had no fgetc( ) nor fputc( ). | well organized for easy reference. The compiler was hard 
These should have at least been defined as macros in | to use relative to others in our environment without re- 
stdio.h. We appreciated the fact that EcoSoft included ! compilation of the CC driver. 


Lattice C 

3 _—« The Lattice compiler had some strengths and weaknesses 
 (e.g., screen I /O) in execution speed. Although one 
f1*"~__ benchmark is inadequate to assess a compiler’s optimiza- 
-__ tion, it should be noted that Lattice won the optimization 
test hands down. Lattice didn’t do particularly well on the 
code-size tests, but it is one of the few vendors providing 
_ the flexibility of an integer-only version of printf( ). Lat- 
~ tice also allows small programs to be changed to .COM 
_ files and provides several large-memory models and an 
option that allows the programmer to trade some pointer- 

arithmetic facility for better generated code. 
The LC program could not handle directory path 
names in its file list, even though LC1 and LC2 allowed 
_ this. The math library was required to do any floating- 
point stuff, not just transcendentals, etc. Also, the math 
_ library had to precede the std library in the search order. 
_ The manual documented neither of these facts. Having 
_ long supported C for MSDOS, Lattice has produced above 
| average documentation for its compiler and included a 
~ good index into the functions. While the installation and 
 getting-started section was brief, it was adequate. The 
_ compiler-operation section was good, but finding the utili- 
| ties operations was a little difficult; these should have had 
_ their own sections. The function descriptions were fairly 
_ well done but lacked examples. The function descriptions 
_ did include a caution paragraph, which is good. This was 
_ the only vendor to supply a packing list with the package. 














































_ Mark Williams C Programming System 

The Mark Williams compiler was the fastest compiler in 
the screen I/O tests. MWC provides an integer-only ver- 
sion of printf( ). We couldn’t determine from the manual 
what the memory model options were when using MWC 
object format (—vsmall and —vlarge also force Microsoft 
object format). There appeared to be no way to specify the 
desired memory model with MWC object format, implying 
that the small model was the only one available. An at- 
tempt to cast a long to a char led to the following compiler 
message: 


113: At 591: Fatal error: no match, op = 62 


This was not too helpful, and the C syntax was legal. And 
__ there was no list of errors in the manual, with or without 
probable cause. 

This compiler had a fairly well done manual, with a 
sample program to compile and run during installation. 
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C Programmers: 


Consider 104 Ways 
To Be More Productive 


lf you find and choose the right development soft- 
ware, you can: cut development effort, make imprac- 
tical projects feasible, and eliminate unproductive, 
frustrating aspects of programming. 


Confused? We'll help you sort thru the huge number 
of alternatives. Call for comparisons or information. 


We carry 27 C Compilers, 4 C Intepreters, 49 Support 
Libraries, 5 C source debuggers, and 19 other C Ada- 
ons for programming with MSDOS, Macintosh, or 
CP/M — more than 104 products, really. Here are 
some of the best products available: 





Learn C Programming 
Only $95 


“Introducing C” Interpreter 


Computer Innovations has done 
it again! This interactive implemen- 
tation is combined with a_ full 
screen editor and a thorough, self- 
paced manual. 

You can develop programs fas- 
ter by getting immediate feed- 
back. Programs will start instantly 
upon your command. There is no 
need to wait for ‘compile and 
link.” 

Introducing C includes demo 
programs, powerful C language 
interpreter, complete C function 
library, full screen editor, color 
graphics, and C language com- 
patibility PCDOS $95 


Inventive Programming Becomes Possible 
with 300 + ESSENTIAL, tested, fast, rountines to Rely On. 
C Utilities Library by Essential Software 
Recent Enhancements to Graphics, Windows, AT Support 


Every application you write is likely fo require functions were you feel like 
you are ‘reinventing’. Don't. Even if you use only 5% of this library, you will 
come out ahead on schedule and cost. 

Full business Graphics, Window support, polled Communications, and 
Data Entry support have recently been added/upgraded along with more 
functions for DOS Interface and AT support. String handling, screen control, 
“word processor” functions, memory management, directory and path ac- 
cess, date handling, program chaining, keyboard and printer control are 
traditional strengths. 

Full source code is included. No royalties are charged fo include functions 
in your programs. 95% are C for portability and to make it practical for you 
to understand or modify them. 

Lattice, Microsoft, C86, Mark Williams, Aztec, Desmet and Wizard C are 
supported. Specify which you need. 

Substantial time, effort, testing and attention has been invested by Essen- 
tial Software developing, documenting and supporting this comprehensive 
library. Make new projects practical and interesting. Use this tested and 
reliable library. 

Some functions are PC-specific. Most support any MSDOS. $159. 


SORT/MERGE Files for 
Clean, Fast Maintenance 
with OPT-TECH SORT __ 


Performance should not suffer 
with DOS or other “free” sorts. 
ISAMs alone are slow when 10% or 
even less is changed/added. 
OPT-TECH includes: 

— CALLable and Standalone use 

— C, ASM, BAS, PAS, FTN, COBOL 

— Variable and fixed length 

— ] to 9 fields to sort/merge 

— Autoselect of RAM or disk 

— Options: dBASE, BTrieve files 

— | to 10 files Input 

— No software max for # Records 

— All common field types 

— By pass headers, limit sort 

— |Inplace sort option 

— Output = Record or keys 
Try what you're using on an XT: 
1,000 128 byte records, 10 byte key 
in 33 seconds. MSDOS. $90. 





Which Compiler Features Do You Need? 
Optimizing C86 Compiler 


Over the years the Optimizing C86 has evolved to be the most complete 
set of C compiler tools. It includes utilities, a rich library, and thorough fech 
support. In line 8087/287 routines run up to 100 times faster than the 8086 
math package The source code fo all routines is included, so you have 
complete contro! over how they work. Thorough ROM support, Intel UDI & 
VMS cross versions are available. 

More of the features you want include: 

¢ special IBM-PC library * 2 math and 2 1/0 libraries 
e full memory utilization of the 8086/88/186/286 
e compatibility with most commercial libraries 
e Version 2.3 has support for source 
level debuggers 


Fast File Access with Source 
C-index + 


MSDOS $339 


C-Index + contains a high performance ISAM, balanced B + Tree index- 
ing system with source and variable length fields. The result is a com- 
plete data storage system to eliminate tedious programming and add effi- 
cient performance fo your programs 

Features include random and sequential data access, virluai memory 
buffering, and multiple key indexes 

With no royalties for programs you distribute, full source code, and 
variable length fields C-Index + fits what you are likely fo need. 

Save time and enhance your programs with C-Index+. MSDOS $375 


File Management: MultiUser/MultiLanguage 
BTRIEVE 


Billions and billions of bytes! That’s what you can control with Btrieve's file 
manager. Btrieve gives you the ISAM capability you need without the 
maintenance headaches. 

Using b-trees for optimum performance, Btrieve aufomafically maintains 
your files in sorted order on up to 24 different fields. And Btrieve offers you 
the fastest search algorithm available, to give you instantaneous access fo 
any individual record. You can locate any record in 4 disk reads or less 
(thanks to Btrieve’s RAM cache, usually less). With Btrieve you can stop 
wasting your time being a file clerk and concentrate on more productive 
tasks. 


Btrieve’s other features include: 
e 4 gigabyte file size 
e 4090 byte record length 
e 255 byte key length 
e duplicate, modifiable, and null keys 
e up to 24 key indexes per file 
e automatic file recovery after power failure 


Btrieve’s Local Area Network version lets you migrate your software fo 
multiuser environments without changing your code. And offers you 
multiuser update capability beyond simple file locking schemes. Available 
for all programming languages as well as C. MSDOS.Single user $245. 
Multiuser $595. 

Btrieve. Don't settle for less. 


Call for details, comparisons, or for our”C Extras Packet’ with over 50 pages of information about C support products. 


THE PROGRAMMERS SHOP 


The programmer’s complete source for software, services and answers 





128-LC Rockland Street, Hanover, MA 02339 


Ask about COD and PO's. All formats available. Prices subject to change. Names of produ 
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(617) 826-7531 (800) 421-8006 
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The function descriptions were reasonably well done and 
readable. There could have been more examples, and 
many functions were packed into one description, making 
it hard to extract pertinent information. 


Microsoft C 

The Microsoft compiler was fast in nearly all categories, 
although it didn’t do well on the random-access diskio( ) 
test. We found it to be a carefully designed compiler, very 
well documented, and with some well-thought-out fea- 
tures. It provides an integer-only version of printf( ) and a 
variety of large-memory models, plus mixed-model pro- 
gramming. This last feature and 8087 emulation are two 
features only Microsoft offers. 
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Microsoft’s compiler set a very high standard for soft- 
ware documentation. Two full binders were included: a 
complete language reference manual plus the compiler 
and library reference manual. The accompanying slip 
case folded down to form a book stand. We found it diffi- 
cult to fault any aspect of Microsoft’s documentation 
package, except for the slight jitter in their laser printer. 
One experienced C programmer in the group noted that 
he had never spent more than a couple of minutes with the 
documentation, because he was able to find what he need- 
ed very quickly. 

The Microsoft compiler includes the Bessel functions; 
has excellent Unix/Xenix portability; and is very easy to 
use. 
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THE PROGRAMMERS SHOP} 


helps save time, money and cut frustrations. Compare, evaluate, and find products. 










SERVICES RECENT DISCOVERI 

- Programmer's Referral List - Dealer's inquire Free Literature - Compare Products “ = 

+ Compare Products - Newsletter Evaluate products Compare competitors Learn about new alternatives One free call PC LINT - full C program checking 
+ Help tind a Publisher « Rush Order brings information on just about any programming need Ask for any “Packet” or and big small model. 

- Evaluation Literature free * Over 700 products | “Addon Packet’ LJ ADA. Modula (J “Al” CIBASIC (1)°C° CICOBOL CL) Editors 


MSDOS $ 95 


- BULLETIN BOARD - 7 Pl to 7 AM 617-826-4086 COFORTH CJFORTRAN CIPASCAL (J UNIX/PC or ()Debuggers. Linkers. etc C86, Lattice. 


ARTIFICIAL INTELLIGENCE 


ARITY/PROLOG-full, debug, to ASM&C, 
16 Meg use, windows, strings. 

With compiler $1950. MSDOS $495 
ExpertEASE - Expert system tool. 
Develop by describing examples of 
how you decide. PCDOS $625 
Expert LISP - Interpreter: Common 
LISP syntax, lexical scoping, toolbox, 
graphics. Compiler. 512K MAC $465 
EXSYS - Expert System building 

tool. Full RAM, Probability. Why, 
serious, files PCDOS $275 
GC LISP -“COMMON LISP”, Help. 
tutorial, co-routines, compiled 
functions, thorough. PCDOS Call 
M Prolog - full, rich, separate 

work spaces. MSDOS $725 


PROLOG-86 - Learn fast. Stan- 
dard, tutorials, samples of Natural 
Language. Exp. Sys. MSDOS $125 


TLC LISP - “LISP-machine’”-like. 

all RAM, classes, turtle graphics 

8087 CPM-86. MSDOS $235 

WALTZ LISP - “FRANZ LISP” - like, 

611 digits, debugger, large 

MSDOS $159 
MSDOS $235 


programs. CPM80 


MicroProlog - improved 


ACTIVE TRACE, DEBUGGER - 
BASICA, MBASIC, interactive, 
well liked MSDOS $ 79 


CADSAM FILE SYSTEM - full ISAM 
MSDOS $150 


8086 279 
CPM86,MSDOS 419 
MSDOS 325 
PCDOS 115 


in MBASIC source. 


BASCOM-86 - Microsoft 
CB-86 - DRI 

Data Manager - full source 
InfoREPORTER - multiple 
Prof. Basic - Interactive, debug PCDOS 89 
TRUE BASIC - ANSI PCDOS 125 
Ask about ISAM, other addons for BASIC 


EDITORS FOR PROGRAMMING 


BRIEF Programmer's Editor - undo, 
windows, reconfig. .PCDOS $195 


VEDIT - well liked, macros, buffers, 
CPM-80-86. MSDOS. PCDOS $119 


86/80 75 
PCDOS 195 
8086 185 
PCDOS 95 


C Screen with source 
Epsilon - like EMACS 
PMATE - powerful 
XTC - multitasking 


COBOL 


Microsoft Version II - upgraded. Full 
Lev. II, native, screens. MSDOS $500 


MSDOS 525 

MAC 1850 
MSDOS 885 
PCDOS call 
MSDOS 695 


Dig Res-decent 

Macintosh COBOL - Full. 
MBP - Lev Il, native, screen 
MicroFocus Prof.-full 

Ryan McFarland-portable 


————————————— ee 


C LANGUAGE 


C-terp Interpreter by Gimpel, 
fullK&R, .OBJ and ASM interface. 


8087 MSDOS $275 


INSTANT C - Interactive develop- 
ment - Edit. Source Debug, run. 
Editto Run-3Secs. MSDOS $445 


“INTRODUCING C’” - Interactive 
C to learn fast. 500 page tutorial. 
examples, graphics PCDOS $ 95 


Wizard C - Lattice C compatible, full 
sys. III syntax, lint included, fast, 
lib. source. MSDOS $450 

MSDOS C86-8087, reliable 
Lattice C - the standard 
Microsoft C 3.0 - new 
Williams - debugger, fast 

CPM80 - EcoPlus C-faster, SLR 
BDS C - solid value 


MEGAMAX C - native Macintosh 
has fast compile, tight code, K&R. 


Call 
279 
call 
275 
125 


toolkit, .OBJ, DisASM MAC $275 
MACINTOSH Hippo I! 375 
Consulair’s MAC C, toolkit 395 


Compare. evaluate. consider other Cs 


C ADDONS 

APPLICATION TOOLKIT by Shaw - 
Complete: ISAM, Screen, Overlay 
mgnt, report gen. Strings, String 
math. Source. CPM, MSDOS $395 

COMMUNICATIONS by Greenleaf 
($159) or Software horizons ($139) 
includes Modem, interrupts, etc. 
Source. Ask for Greenleaf demo. 

C SHARP Realtime Toolkit-well 
supported, thorough, portable, ob- 
iects, state sys. Source MANY $600 

Cindex + -fullB+Tree, vari. length 
field. Source, no royal. MSDOS $369 


dbVista FILE SYSTEM - full indexing, 
plus optional record types, pointers. 


Source, no royal. MSDOS $450 
CHelper: DIFF, xref, more 86/80 135 
CTree - source, no royal ALL 369 
dBC ISAM by Lattice 8086 229 
Greenleaf-200 + MSDOS 159 
OTHER: C Utilities by Essential MSDOS 129 
PHACT-up under UNIX, addons MSDOS 225 
ProScreen - windows PCDOS 275 
SCREEN: CURSES by Lattice PCDOS 125 
Software Horizons - Blocks | PCDOS 139 
Turbo V - Greenleaf C, fast PCDOS 159 
Windows for C MSDOS 175 


Call for a catalog, literature, and solid value 


800-421-8006 


THE PROGRAMMER’S SHOP™ 


128-DRockland Street, Hanover, MA02339 


Mass: 800-442-8070 or 617-826-7531 8517 
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UU els 


MacFORTRAN - full ’77, 66 option. 
toolbox, debugger, 128K or 512K. 
ASM-out option MAC $375 
RM/Fortran - Full’77. BIG ARRAYS. 
8087, optimize, back trace, 

debug. MSDOS $525 


Ask about Microsoft, Supersoft, others. 


MS FORTRAN-86 - Improved. MSDOS 239 
DR Fortran-86 - full ‘77 8086 249 
PolyFORTRAN-XREF, Xtract PCDOS 165 


LANGUAGE LIBRARIES 


call| MultiHALO Graphics-Multiple video 


boards, printers, rich. Animation, 

engineering business. 

Any MS language, Lattice C86 $195, 
for Turbo $95. 

Screen Sculptor - slick, thorough, 

fast, BASIC, PASCAL. PCDOS $115 


GRAPHMATIC - 3D, FTN, PAS PCDOS 125 
File MGNT: BTrieve - all lang. MSDOS 215 
Micro: SUBMATH - FORTRAN full 86/80 250 
MetaWINDOW - icons, cup PCDOS 139 
PANEL - many lang. term MSDOS 249 


OTHER LANGUAGES 
ASSEMBLER-ask about Turbo ASM 
($95), ED/ASM ($95) - both are 

fast, compatible. or MASM 

($125), improvements. 

BetterBASIC all RAM, modules. 
structure. BASICA - like PCDOS $185 


SNOBOL4 + -great for strings, 


patterns. CPM86, MSDOS $ 85 
MacASM - full, fast, tools MAC 115 
Assembler & Tools - DRI 8086 159 
PL1-86 8086 495 
PCFORTH - well liked MSDOS 95 


SUPPORT PRODUCTS 


PLINK - a program-independent 
overlay linker to 32 levels for all MS 


languages. C86 and Lattice. $315 
Multilink - Multitasking PCDOS 265 
Pfinish - Profile by routine MSDOS 345 
Polylibrarian - thorough MSDOS_ 95 
PolyMAKE PCDOS 95 
ZAP Communications-VT 100. 

TEK 4010, full xfer PCDOS 65 


DEBUGGERS 


Periscope Debugger - load after 
“bombs”, symbolic, “Reset Box”, 2 


Screen, own 16K. PCDOS $279 
Advanced Trace 86 Symbolic PCDOS 149 
Atron Debugger for Lattice PCDOS 395 
CODESMITH-86 - debug PCDOS 129 
PFIX-86 Debugger MSDOS 169 
TRACE86 debugger ASM MSDOS 115 


Note: All prices subject to change without notice 
Mention this ad. Some prices are specials 

Ask about COD and POs. All format's available 
UNIX is a trademark of Bell Labs. 


DISK/ COVERS 
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Software Toolworks C 

The Software Toolworks compiler for MSDOS is a port of 
their C80 compiler for CP/M. The original compiler was a 
descendant of Small C, adding such features as multi- 
dimensional arrays and structures. The MSDOS version 
does not currently support the long, float, or double data 
types. Longs and floats will be available in an optional 
‘““mathpack,” currently under development. The lack of 
these data types meant that we could not run some bench- 
marks, and the prtf( ) benchmark had to be modified so 
that the same number of lines were produced, but all 
longs, floats, and doubles were changed to ints. 

Although the compiler does not support longs, it does 
support fseek for files in excess of 64K. The file position 
has to be passed as an array of two ints. As a result, a 
special version of the diskio benchmark was written; the 
principal changes were to make all longs arrays of int and 
to use a file created with the Lattice compiler to obtain 
the random position to seek to. The seek addresses were 
identical to those used in other benchmarks. The compiler 
also did not support initialization of data of class auto. 
Several of the benchmarks had to be changed to account 
for this feature. 

Other unimplemented features included: typedef, bit 
fields, and line control (#line). Major restrictions includ- 
ed: function calls had to have the same number of argu- 
ments as the called function definition, which resulted in 
a kludge in printf, fprintf, sprintf, scanf, fscanf, and scanf; 
declarations were allowed only at the start of a function; 
#define could not have arguments. The printf kludge re- 
quired that stdio.h be included for minprtf. The compiler 
supported the small model only (64K of code and 64K of 
data). The compiler included a function profiler that re- 
corded the total number of calls to a function and the time 
spent in each function. In contrast to the C80 compiler, 
this compiler did not support in-line assembly code, al- 
though details of the assembly language interface were 
provided in the manual. This was clearly a subset compil- 
er, with poor documentation. There was an index, though 


$199-Pro 


: Package $500 
__ Microsoft $279 =. 
_ Computer Innovations $395 ts 
_ Mark Williams $495  ##2~» 
- Control-C $500 
c-Systems $199 ) 
_ Wizard $450 
- DeSmet $109 + $50 (debugger) 
+ $35 (DOS LINK) 
Datalight $60 
Ecosoft $49.95 
Lattice $425 — 
Software Toolworks $49.95+ ($29.95 float) 
C-terp $300 oo 
Instant C $495 
_Run/C $149.95 
Table 7 


Compiler and Interpreter Prices . 
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there were many functions to a page, making it difficult to 
find and read the descriptions. The function descriptions 
were terse and devoid of examples, again making it diffi- 
cult for a new user. 


Wizard C 

Wizard’s was generally a fast compiler. It supports a vari- 
ety of large-memory models, lets the programmer trade 
some pointer-arithmetic capabilities for better generated 
code, and allows very small programs to be changed to 
.COM files. Wizard’s got the highest marks for support. 

Field width specification did not work for character 
conversions in printf( ); e.g., printf(%17c,c) produced one 
character, not 17. Careful reading of K&R leaves us with 
small doubt that Wizard is in the wrong. It is certainly 
safe to say that if Wizard maintains that field width is not 
supposed to work with %c, then they stand alone. 

The Wizard compiler was an obvious port down from 
Unix, as the documentation reflected Unix throughout. 
While the getting-started section was small (one page) 
and no installation section was included, we appreciated 
the 22 pages of error messages. The function descriptions 
were readable, but like functions were grouped together 
and there were no examples. 

Excellent diagnostics were provided for portable code; to 
increase portability from Unix, the library included Unix 
functions that have little meaning but are a pain to remove 
(e.g., getpid). The compiler supports anachronisms (= + 
...); supports the use of libraries for other compilers by 
changing call and return specifics; and includes lint. It has 
PL/M compatibility and is very easy to use. 


Miscellaneous Comments 

Microsoft, Wizard, Mark Williams, Control C, Ecosoft 
These all had drivers that allowed the compilation of sev- 
eral files (assembly of assembly language files) and op- 
tional linkage of the files. This proved to be a great boon. 
Mark Williams, Control C 

Excellent source level debuggers and very nice examples 
of usage in the manual and on disk; does not interfere with 
screen I/O. 

DeSmet, Aztec, c-systems 

Included source or symbolic level debuggers, but we did 
not test them. 

Microsoft, Lattice, Wizard 


Support use of third party or optional source level debug- 


gers, such as SYMDEB. 

Aztec, Wizard, Lattice, DeSmet 

Provide for generation of ROMable code. 
Microsoft, Aztec, Mark Williams, Control C, 
c-systems, DeSmet, Wizard 

The first six used environment to pass “‘usual” options to 
compiler; Wizard used a file and this approach was slight- 
ly preferred. DeSmet and c-systems had bugs in usage. 
Microsoft, Aztec, Wizard, Contol C, Mark Williams 
Support new structures (passing, assigning, and return- 
ing) and enum and void. 

Aztec, DRI 

Could not locate math functions in table of contents; in- 
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cludes overlay support. 

Mark Williams, Control C 

Unable to determine from the documentation what the 
specifics of the large model were. 

Aztec, C!l-86, Wizard, Software Toolworks 


Library source included or available. 


Summary 

Were we objective? We all had our preferences and un- 
equal experience with the compilers going into the review; 
we can’t expect that we entirely overcame them. But large 
amounts of data can swamp out fairly extreme priors, and 
it was hard to deny the numbers we were getting. 

So, who won? If you pressed us to declare a winner, 
we'd probably say the Microsoft or Aztec compiler. But 
the Wizard compiler had excellent diagnostics; it would 
be easier writing portable code with it than with any other 
compiler we tested. And the Mark Williams compiler had 
the best debugger. Our data would support different re- 
sults, depending on how you chose to weight the features 
we assessed. No two programmers will weight them the 
same way. And we took almost no account of price. For 
addresses of compiler vendors see Table 6 (page 54); for 
compiler prices see Table 7 (page 50). 
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Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 191. 


NON 


for Microsoft 
Cale [ela ono 


the " 
_ / source debugger 
, for lattice C 


7 Your time and convenience come 
7 first! The MSD C Debugger” is the last, 
7 and perhaps final, word in programming 
| assistance for Lattice C users. C Debugger 
| produces a high level view of C programs 
via function names, line numbers, variable 
names and C data types, plus a low-level view 
of machine addresses and instructions for 
testing assembler language functions. 


More features include: 

e All documentation is prepared for 
programmers. 

¢ Online help screen throughout the 
process. 

¢ Capability to single step 
through your program. 

e Set break points, examine registers and 
variables. 2 


$165.00 +$3.50 shipping 





To order, call or write: 

MICRO-SOFTWARE DEVELOPERS, INC. 
2141/2 W. Main St. « St. Charles, IL 60174 
312/377-5151 


Lattice C is a trademark of Lattice, Inc. 
Microsoft is a trademark of Microsoft Corp. 
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A Peephole Optimizer for 
Assembly Language Source Code 


by David L. Fox 
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he need for small fast programs 
+ is a constant of computer pro- 

gramming. Unfortunately, 
small fast programs tend to be diffi- 
cult to write and maintain. As a re- 
sult a programmer often has to make 
a choice between assembly language 
and a high-level language. 

D. E. Cortesi, who has discussed 
this problem in several “Dr. Dobb’s 
Clinic” columns,! has pointed out 
that an optimizing compiler is a pow- 
erful incentive to choose a high-level 
language. The compilers currently 
available for microcomputers, how- 
ever, fall far short of the state of the 
art in terms of the size and speed of 
the code they produce. In fact, many 
of these compilers produce code that 
could be improved by the simple 
technique of peephole optimization. 

In this article, I describe a stand- 
alone peephole optimizer that can 
post-process the output of any compil- 
er producing assembly language 


Program Optimization 

The term optimization, as it is usual- 
ly applied to programs, is actually 
something of a misnomer: it derives 
from the word optimum, meaning the 
best possible, and no program opti- 
mizer or optimizing compiler can se- 
riously claim to produce the best pos- 
sible code. A more realistic goal is 
merely to improve the code. 

The greatest improvement in a 
program usually comes from using a 
better algorithm. If you are not con- 
vinced of the importance of choosing 
an efficient algorithm, I suggest that 
you write two routines to sort an ar- 
ray of numbers, one using a bubble 
sort and another using a Shell sort. 
Use them to sort an array of 1000 
numbers. The bubble sort, which re- 
quires a time proportional to the 
square of the number of items sorted, 
will run tens or even hundreds of 
times longer than the Shell sort, 
which requires time proportional to 





Algorithms for finding and replacing regular ex- 
pressions are well known. Common inefficiencies 
in compiler output can be specified as regular 
expressions. So... 





source code. The program is written in 
C and has been compiled with Soft- 
ware Toolworks’ C/80 compiler. Ac- 
cording to a published benchmark 
comparison,? in terms of both code 
size and execution speed this is one of 
the better C compilers available for 
CP/M. Nevertheless, peephole optimi- 
zation can improve its output, and | 
will use it for the examples in this 
article. 





David L. Fox, 2140 Braun Dr., Gold- 
en, CO 8040] 


n'- to sort n items. Unfortunately, 
the choice of algorithm is not some- 
thing that we can easily mechanize. 
If you want a substantial improve- 
ment in the performance of a pro- 
gram, rewriting it using a better algo- 
rithm may be the only choice 
available. 

The more modest improvements 
obtained by the means discussed be- 
low should not be dismissed, however, 
because they frequently lend them- 
selves to implementation by a pro- 
gram (an optimizing compiler or a 
separate optimizer) and require little 
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effort on the part of the programmer. 
Many of these improvements involve 
recognizing specific constructions in 
the input and replacing them with 
more efficient code in the output. This 
process is easily mechanized. 

One rich source of potential im- 
provement in compiler output is re- 
moving the recalculation of values 
that are already available. For exam- 
ple, a straightforward compilation of 
a statement such as 


afi] = b{i] + ci] 


will calculate the byte offset associat- 
ed with the subscript 7 three times. (If 
a, b, and c are arrays of 16-bit inte- 
gers, this offset is 2*i.) Substantial 
savings would be possible if this type 
of situation were recognized and the 
offset calculated only once. 

An even simpler example of this is 
illustrated in Listing One (page 68) 
where the compiler produces the pair 
of instructions: 


SHLD 1 
LHLD 1 


After execution of SHLD i, the con- 
tents of i are still in the HL register 
pair and the LHLDi may be omitted. 
Note, however, if the LHLD instruc- 
tion is labeled, it may not be omitted. 

Another example in Listing One is 
the following: 


MOV A,H 
ORA L 

JINZ Ll 
LXI_ H,0O 


The zero flag is set if HL contains 
zero, in which case the jump to LI is 
not taken and the LXI H,0 may be 
removed. 

Simple compilation of conditionals 
and loops often results in multiple 
jump instructions that can be easily 
improved. A jump to a jump can be 
replaced by a single jump instruction, 
as shown in Listing One. Another 
commonly found construction is the 
jump over a jump, such as 


FL oA 


JMP L2 
Belt ss 
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How to go 


om 
UNIX to DOS 


without. 


compromising 


your 
standards. 


It's easy. Just get an industry standard file access 
method that works on both. 

C-ISAM™ from RDS. 

Its been the UNIX™ standard for years (used in 
more UNIX languages and programs than any other 
access method), and it’s fast becoming the standard 
for DOS. Why? 

Because of the way it works. Its B+ Tree index- 
ing structure offers unlimited indexes. There's also 
automatic or manual record locking and optional 
transaction audit trails. Plus index compression to 
save disk space and cut access times. 

How can we be so sure C-ISAM works so well? 

We use it ourselves. It's a part of INFORMIX; 
INFORMIX-SQL and File-it! our best selling data- 
base management programs. 

For an information packet, call (415) 424-1800. 
Or write RDS, 2471 East Bayshore Road, Palo Alto, 
CA 94303. 

Youll see why anything less than C-ISAM is just 
a compromise. 


oN 


2) 


RELATIONAL DATABASE SYSTEMS, INC. 


© 1985, Relational Database Systems, Inc. UNIX is a trademark of AT&T Bell Laboratories. INFORMIX is 
a registered trademark and RDS, C-ISAM and File-It! are trademarks of Relational Database Systems, Inc. 
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Add EDITING 
to your 


Software 
with 
CSE Run-Time’ 


Your program can include all or a portion 
of the C Screen Editor (CSE). 


CSE includes all of the basics of full 
screen editing plus source in C for only 
$75. For only $100 more get CSE Run- 
Time to cover the first 50 copies that you 
distribute. 

‘Use capabilities like Full cursor control, 
‘block move, insert, search/replace or 
others. Portability is high for OSes, ter- 
minals, and source code. 

Call for the ‘‘CSE Technical Description’’ 
and for licensing terms and restrictions. 




























Full Refund if > ° 
not satisfied in <>dlution 
first 30 days. < ystems 
Call 800-821-2492 335-D Washington Street 
Norwell, MA 0206) 


617-659-1571 
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XREF — cross referen »S 


C Flow Chart - sh¢ wewhea 


GREP - search for sophisticated patterns in text. 


There are several other utilities that help with converting 


from one C compiler to another and with printing 
programs. 


C Helper is written in portable C and includes both full 


Solution 
ystems” 


335,Washington Street 


source code and executable files 
for $135 for MS-DOS, IBM AT 
CPM-80 or CPM-86. Use 

VISA, Master Card or COD. < 
Call: 800-821-2492 


Norwell, MA 0206) 
617-659-1571 
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ONLY $95. 

Full Refund if not satisfied Systems” 
during first 30 days. 
Call 800-821-2492 617-659-1571 





call each other. 
C Beautifier — make source more regular and readab! 2. 





Scrap your LINKER 


FASTER C 


Reliably: 


CUT Compile times (by 15% to 55%) 
CUT Testing times (by 12% to 37%) 


HOW: FASTER C keeps the Lattice C or C86 library and any other 
functions you choose in memory. It manages a jump table to replace 
the LINKER and immediately execute your functions. You can also 
CALL active functions interactively to speed your program debug- 
ging. Itincludes many options for configuration and control. 


“Automatic” support for new libraries by reading the .OBJ files 
makes support for new libraries quick and simple. 


AVAILABLE FOR PC-DOS,IBM-AT, 
AND ANY 256K MSDOS SYSTEM. 


solution 





335-D Washington St., Norwell, Mass. 02061 
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PROLOG-86 ~ 


Become Familiar in One Evening 


Thorough tutorials are designed to help learn the PROLOG language 
quickly. The interactive PROLOG-86 Interpreter gives immediate feed- 
back. In a few hours you will begin to feel comfortable with it. In a few 
days you are likely to know enough to modify some of the more 
sophisticated sample programs. 


Sample Programs are Included like: 


@ an EXPERT SYSTEM 

@ a NATURAL LANGUAGE INTERFACE 
(it generates a dBASE II ‘‘DISPLAY’’ command) 

@ a GAME (it takes less than 1 page of PROLOG-86) 


PROTOTYPE Ideas and Applications QUICKLY 


Serious development of experimental systems and prototypes is practical 
with the full syntax of PROLOG-86. 1 or 2 pages of PROLOG is often 
like 10 pages in ‘‘C’’. 
Programming Experience is not required but a logical mind is. 
PROLOG -86 supports the de facto STANDARD. 

RECENT IMPROVEMENTS: Access to MSDOS, on-line 
help, load Editor. 
AVAILABILITY: All MSDOS, PCDOS systems. 
FREE with order: ‘‘Best of Prolog-86 Programs’’ — contest entries in- 
clude: a primate expert system, an automobile expert system, a blocks 
world natural language system, etc. Call before November 30. 


ip e 
Only $125 olution 
Full Refund if not ystems 
satisfied during 
first 30 days. 
800-821-2492 



















335-D Washington Street 
Norwell, MA 02061 


617-659-1571 
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which may be replaced by 


JINZ L2 
Pies 


Any unlabeled instruction follow- 
ing an unconditional jump can never 
be executed and may be removed. 
Also candidates for removal are un- 
reachable instructions created by the 
jump optimization described above. 
For example: 


JMP LI 


JMP L2 
Lic IMP L3 


After we replace JMP L1 with JMP 
L3 and remove the label L1, JMP L3 
becomes unreachable and may also 
be removed. Thus, one improvement 
can create an opportunity for further 
improvement, making it worthwhile 
to pass the program through the opti- 
mizer more than once. 

The examples so far have not in- 
volved any trade-offs between code 
size and execution speed. In the fol- 
lowing situation, speed or size can be 
optimized, but not both. Pointer de- 
referencing (obtaining the value 
stored at a given address) may in- 
volve the following subroutine: 

deref: MOV A,M 
INX H 
MOV H,M 
MOV L,A 
Red 


Excluding the RET instruction, the 
above subroutine is only four bytes 
long. Because any program that uses 
pointers or arrays does quite a bit of 
dereferencing, use of the subroutine 
deref will produce a smaller program. 
If speed is more important, however, 
replacing the three-byte instruction 
CALL deref with four bytes of in-line 
code will result in faster execution. 
Some compilers allow the user to 
choose whether smaller or faster code 
is more important, but most compil- 
ers for microcomputers do not pro- 
vide this option. 

The details of the compiler and the 
machine instruction set may offer 
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other opportunities for improvement. 
One common possibility arises from 
the fact that many compilers for 
CP/M produce 8080 code. If you 
have a Z80 processor, you may find 
ways to replace combinations of 8080 
instructions with Z80 instructions. A 
good example is a 16-bit subtraction, 
which requires six instructions on an 
8080 but only a single Z80 instruc- 
tion. Identifying the possible im- 
provements for your compiler will re- 
quire careful study of its output and 
runtime library. 

These examples illustrate the types 
of improvements that the peephole op- 


timizer can make. Many other im- 
provements, which require some 
knowledge of the organization and 
structure of the program such as rec- 
ognizing constant expressions and re- 
moving them from loops, are beyond 
the scope of the optimizer presented 
here. 

If the optimizer is specific to one 
compiler, it can be quite simple; see 
the optimization section of Small-C 
version 2.3 On the other hand, if you 
want to use the program with differ- 
ent compilers or have some flexibility 
in what changes to make, the opti- 
mizer will require most of the capa- 
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The C for Microcomputers 


AALU=EC 


PC-DOS, MS-DOS, CP/M-86, Macintosh, Amiga, Apple II, CP/M-80, Radio Shack, 


= Commodore, XENIX, ROM, and Cross Development systems 





Manx Aztec C86 
“A compiler that has many strengths ... quite valuable 
for serious work” 

Computer Language review, February 1985 
Great Code: Manx Aztec C86 generates fast executing 
compact code. The benchmark results below are from a 
study conducted by Manx. The Dhrystone benchmark 
(CACM 10/84 27:10 pl018) measures performance for a 
systems software instruction mix. The results are with- 
out register variables. With register variables, Manx, 
Microsoft, and Mark Williams run proportionately faster, 
Lattice and Computer Innovations show no improve- 
ment. 


Execution Code Compile/ 
Time Size Link Time 


Dhrystone Benchmark 
Manx Aztec C86 3.3 34 secs 
34 secs 


93 secs 
119 secs 
172 secs 
113 secs 
117 secs 


Microsoft C 3.0 
Optimized C86 2.20) 53 secs 


Mark Williams 2.0 
Lattice 2.14 


56 secs 
89 secs 


Great Features: Manx Aztec C86 is bundled with a powerful 
array of well documented productivity tools, library routines 
and features. 


Optimized C compiler Symbolic Debugger 

AS86 Macro Assembler LN86 Overlay Linker 
80186/80286 Support Librarian 

8087/80287 Sensing Lib Profiler 

Extensive UNIX Library DOS, Screen, & Graphics Lib 
Large Memory Model Intel Object Option 

Z (vi) Source Editor -c CP/M-86 Library -c 

ROM Support Package-c § INTEL HEX Utility -c 
Library Source Code -c Mixed memory models -c 


MAKE, DIFF and GREP -c Source Debugger -c 
One year of updates -c CP/M-86 Library -c 


Manx offers two commercial development systems, 
Aztec C86-c and Aztec C86-d. Items marked -c are 
special features of the Aztec C86-c system. 


Aztec C86-c Commercial System $499 
Aztec C86-d Developer’s System $299 
Aztec C86-p Personal System $199 
Aztec C86-a Apprentice System $49 


All systems are upgradable by paying the difference 
in price plus $10. 


Third Party Software: There are a number of high qual- 
ity support packages for Manx Aztec C86 for screen 
management, graphics, database management, and soft- 
ware development. 


C-tree $395 Greenleaf $185 
PHACT $250 PC-lint $98 

HALO $250 Amber Windows $59 
PRE-C $395 Windows for C $195 


WindScreen $149 FirsTime $295 
SunScreen $99 __C Util Lib $185 
PANEL $295 Plink-86 $395 










Manx Aztec C68k 


“Library handling is very flexible ... documentation is 
excellent ... the shell a pleasure to work in ... blows 
away the competition for pure conipile speed ... an ex- 
cellent effort.” 

Computer Language review, April 1985 
Aztec C68k is the most widely used commercial C com- 
piler for the Macintosh. Its quality, performance, and 
completeness place Manx Aztec C68k in a position be- 
yond comparison. It is available in several upgradable 
versions. 


Optimized C Creates Clickable Applications 
Macro Assembler Mouse Enhanced SHELL 
Overlay Linker Easy Access to Mac Toolbox 
Resource Compiler UNIX Library Functions 
Debuggers Terminal Emulator (Source) 
Librarian Clear Detailed Documentation 
Source Editor C-Stuff Library 

MacRam Disk -c UniTools (vi,make,diff,grep) -c 


One Year of Updates -c 


Items marked -c are available only in the Manx Aztec 
C86-c system. Other features are in both the Aztec C86-d 
and Aztec C86-c systems. 


Aztec C68k-c Commercial System $499 


Library Source -c 


Aztec C68d-d Developer’s System $299 
Aztec C68k-p Personal System $199 
C-tree database (source) $399 


AMIGA, CP/M-68k, 68k UNIX call 


Manx Aztec C65 


“The AZTEC C system is one of the finest software 
packages I have seen” 
NIBBLE review, July 1984 


A vast amount of business, consumer, and educational 
software is implemented in Manx Aztec C65. The quality 
and comprehensiveness of this system is competitive 
with 16 bit C systems. The system includes a full optim- 
ized C compiler, 6502 assembler, linkage editor, UNIX 
library, screen and graphics libraries, shell, and much 
more. The Apple II version runs under DOS 3.3, and 
ProDOS, Cross versions are available. 

The Aztec C65-c/128 Commodore system runs under 
the C128 CP/M environment and generates programs for 
the C64, C128, and CP/M environments. Call for prices 
and availability of Apprentice, Personal and Developer 
versions for the Commodore 64 and 128 machines. 


Aztec C65-c ProDOS & DOS 3.3 $399 


Aztec C65-d Apple DOS 3.3 $199 
Aztec C65-p Apple Personal system $99 
Aztec C65-a for learning C $49 


Aztec C65-c/128 C64, C128, CP/M $399 


Distribution of Manx Aztec C 


In the USA, Manx Software Systems is the sole and ex- 
clusive distributor of Aztec C. Any telephone or mail 
order sales other than through Manx are unauthorized. 


To order or for information call: 


_ 800-221-044 


Cross developed programs are edited, compiled, assem- 
bled, and linked on one machine (the HOST) and trans- 
ferred to another machine (the TARGET) for execution. 
This method is useful where the target machine is slower 
or more limited than the HOST, Manx cross compilers 
are used heavily to develop software for business, 
consumer, scientific, industrial, research, and education- 
al applications. 


HOSTS: VAX UNIX ($3000), PDP-11 UNIX ($2000), MS- 
DOS ($750), CP/M ($750), MACINTOSH ($750), 
CP/M-68k ($750), XENIX ($750). 


TARGETS: MS-DOS, CP/M-86, Macintosh, CP/M-68k, 
CP/M-80, TRS-80 3 & 4, Apple II, Commodore C64, 
8086/80x86 ROM, 68xxx ROM, 8080/8085/Z80 ROM, 
65xx ROM. 

The first TARGET is included in the price of the HOST 
system. Additional TARGETS are $300 to $500 (non 
VAX) or $1000 (VAX). 

Call Manx for information on cross development to the 
68000, 65816, Amiga, C128, CP/M-68K, VRTX, and 
others. 


Manx Aztec CI 


‘T’ve had a lot of experience with different C compilers, 
but the Aztec C80 Compiler and Professional Develop- 
ment System is the best I've seen.” 

80-Micro, December, 1984, John B. Harrell III 


Aztec C II-c (CP/M & ROM) $349 
Aztec C II-d (CP/M) $199 
C-tree database (source) $399 
Aztec C80-c (TRS-80 3 & 4) $299 
Aztec C80-d (TRS-80 3 & 4) $199 
How To Become an Aztec C User 


To become an Aztec C user call 1-800-221-0440 or call 
1-800-832-9273 (800-TEC WARE). In NJ or outside the 
USA call 201-530-7997. Orders can also be telexed to 
4995812. 

Payment can be by check, COD, American Express, 
VISA, Master Card, or Net 30 to qualified customers. 

Orders can also be mailed to Manx Software Systems, 
Box 55, Shrewsbury, NJ 07701. 


How To Get More Information 

To get more information on Manx Aztec C and related 
products, call 1-800-221-0440, or 201-530-7997, or write 
to Manx Software Systems. 


30 Day Guarantee 

Any Manx Aztec C development system can be return- 
ed within 30 days.for a refund if it fails to meet your | 
needs. The only restrictions are that the original pur- 
chase must be directly from Manx, shipped within the 
USA, and the package must be in resalable condition. 
Returned items must be received by Manx within 30. 
days. A small restocking fee may be required. 


Discounts 

There are special discounts available to professors, 
students, and consultants. A discount is also available on 
a “trade in” basis for users of competing systems. Call for 
information: ; 





a. 






Manx Aztec C86 
is the best C for MS-DOS 
and you can prove it yourself! 


“A compiler that has many strengths ... quite valuable for serious work” 
_Computer Language review, February 1985 


AZTEC 





Manx Aztec C86 is clearly the best C software develop- 
ment system for MS-DOS. Aztec C86 is the only C com- 
piler for MS-DOS that provides the level of performance, 
features, documentation, and support required for seri- 
ous, professional software development. You can prove it 
yourself. All you have to do is order Aztec C86 from 
Manx, evaluate it, and, if you like it, keep it. If you don’t 
like it, send it back within 30 days and we'll cancel your 
order. 

If you keep your Manx Aztec C86, as 99% do, you'll be 
in with the best company. 


Optimized C compiler: Unsurpassed for code quality 
and speed. Optionally generates 80186 and 80286 code. 
Full K & R. 


Symbolic Debugger: Execution trace, break points, 
display data in floating point, integer, character, or hex 
format. Evaluate expressions. Detect illegal memory 
stores, modify memory/registers, disassemble code. 


Manx AS86 Macro Assembler: Supports macroes, 
8086, 80186, and 80286 instructions in Intel format. Fast 
execution. 


LN8&6 Overlay Linker: Links small, large, and mixed 
memory model routines, supports overlays, and options 
for producing ROM based code. 


Librarian: Build and modify personal or system run 
time libraries. 


8087/80287 Sensing Library: One library simulates 
floating point, another assumes the presence of an 8086 
or 80287 math chip, the third senses the existence of a 
math chip, and if it finds one it uses it. 


Profiler: Provides a run time analysis of your code to 
pinpoint code segments to optimize. 


UNIX Library: Compatible with UNIX C. Fast I/O. Ter- 
minal I/O can be buffered or unbuffered. 


DOS Library: Time and date functions, program fork- 
ing (exec), program chaining, directory commands, I/O 
port support, sysint support, BIOS functions, and BDOS 
functions. 


Screen & Graphics Library: Screen and cursor func- 
tions. Fast routines for drawing lines, circles, elipses, 
points, and setting colors. 


CP/M-86 Library (-c): Produce programs for 
CP/M-86. 


Large Memory Model: Manx Aztec C86 supports pro- 
grams and data of any size. Global data has a max size of 
64k. 


Intel Object Option: Interface to software that re- 
quires Intel object format, such as PLINK86. 


Z (vi) Source Editor (-c): Fast, powerful editor, Macro 
capabilities, undo, ctags, buffers for commands and data, 
and all the bells and whistles that make vi fanatics 
fanatical. 








ROM Support Package (-c): Startup routine, linker 
options for separate placement of code and data, special 
utilities like the Intel HEX Utility, documentation, and 
library source. 


Library Source Code (-c): UNIX, screen, graphics, 
and math function libraries. 


Mixed Memory Models (-c): Mix large code and small 
data, small code and large data, or mix within type. 


UniTools (-c): The UNIX utilities make, diff, and grep. 


One year of updates (-c): As new versions are re- 
leased, updates are automatically sent. 


Technical Support: Manx has a full time staff to pro- 
vide support via telephone & bulletin board. 

Items marked -c are special features of the Aztec C86-c 
system. 

Manx Aztec C86 is available in four configurations: 
Manx Aztec C86-c, Manx Aztec C86-d, Manx Aztec 
C86-p, and Manx Aztec C86-a. The -p and -a systems are 
not intended for commercial work and do not incor- 
porate the same compilers as the -c and -d systems. All 
systems are upgradable. 


Aztec C86-c Commercial System $499 
Aztec C86-d Developer’s System $299 
Aztec C86-p Personal System $199 
Aztec C86-a Apprentice System S$ 49 


Manx Aztec C compilers are available as native or as 
cross development systems for PC-DOS, MS-DOS, 
Macintosh, CP/M-86, CP/M-80, TRSDOS, Apple II, and 
Commodore 64/128. 

Cross development involves two computer systems: 
the development system (HOST) and the execution sys- 
tem (TARGET). This method is useful when the TAR- 
GET machine is slower or more limited than the HOST. 


HOSTS: VAX UNIX ($3000), PDP-11 UNIX ($2000), 
MS-DOS ($750), CP/M ($750), Macintosh ($750), CP/M- 
68k ($750), XENIX ($750). 


TARGETS: MS-DOS, CP/M-86, Macintosh, CP/M-68k, 
CP/M-80, TRS-80 3 & 4, Apple II, Commodore C64, 
8086/80x85 ROM, 68xxx ROM, 8080/8085/Z80 ROM, 
65xx ROM. 

Additional TARGETS are $300 to $500 (non VAX) or 
$1000 (VAX). Call for information, on cross development 
to the 68000, 65816, Amiga, C128, CP/M-68K, VRTX, 
and others. 


Call 1-800-221-0440 or 1-800-832-9273 (800-TEC 
WARE). In NJ or outside the USA call 201-530-7997. 
Orders can also be telexed to 4995812. 

Payment can be by check, COD, American Express, 
VISA, Master Card, or Net 30 to qualified customers. 

Orders can also be mailed to Manx Software Systems, 
Box 55, Shrewsbury, NJ 07701. 

For More Information: call 1-800-221-0440, or 201- 
530-7997, or write to Manx Software Systems. 

Manx maintains a large professional staff to service 
and support Manx users. You will get fast delivery and 
great service dealing directly with Manx. 






C-tree $395: B-tree database system. Easy to use. 
Available for Aztec C for MS-DOS, Macintosh, CP/M-86, 
CP/M-80, and others. Includes source. 

PHACT $250: Powerful database system. Available 
for Manx Aztec C compilers for MS-DOS, CP/M-86, 
CP/M-80, and Macintosh. 

PANEL $295: Create screens via simple, powerful 
editing commands. Select colors, edit fields. Directly in- 
put data to a multi-keyed file utility included with the 
system. 

SunScreen $99: Create and modify formatted 
screens easily. Validate fields, select colors, create 
screens for both the color and monochrome cards. With 
library source SunScreen is $199. 

WindScreen $149: Combines SunScreen with a pow- 
erful window utility. 

Windows for C $195: Versatile window utility that 
supports IBM PC compatible and some non-compatible 
environments. 

AMBER Windows $99: Powerful, low priced window 
package. 

HALO $250: The ultimate C graphics package. It sup- 
ports viewports, shapes, and multiple graphics cards. A 
less expensive version is available for just the PC mono 
and color cards. 

FirsTime $295: Syntax checking while you edit great- 
ly shortens compile time. 

Pre-C $395: Powerful Lint-like utility locates struc- 
tural and usage errors. Easily checks multiple files for 
bad parameter declarations and other interface errors. 
Lint users will find the user interface a dream come true. 
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bilities of a general text editor. For 
that reason, I have borrowed heavily 
from Chapters Five and Six of Ker- 
nighan and Plauger’s book Software 
Tools in Pascal, which give Pascal 
listings for a fairly complete editor. 
Listing Five (page 76) contains the 
needed routines (translated into C 
and slightly extended) from Ker- 
nighan and Plauger’s editor. 


Regular Expressions 

Once you have identified output from 
your compiler that may be improved, 
you must communicate descriptions 
of the improvable constructions to 
the optimizer program. The notation 
must be precise and unambiguous— 
capable of specifying constructions 
such as: 


first line: 
second line: 


SHLD (any label) 
LHLD (same label 
as above) 


A notation sufficiently powerful to 
describe such strings is used widely 
within the Unix environment. This 
notation, adopted here, is that of reg- 
ular expressions. 

A regular expression is a descrip- 
tion of a set of strings. The simplest 
case is when the regular expression 
describes a single string: the regular 
expression is just the string itself. For 
example, the regular expression for 
the 8080 store HL instruction mne- 
monic is SHLD. Nonprinting charac- 
ters are represented by the standard 
C escapes: 


\b backspace 

\n newline 

\r carriage return 

\t tab 

\\ backslash 

\nnn byte with octal value nnn 


An alternative way of looking at a 
regular expression is as a pattern. A 
string matches the pattern if, starting 
at the left, each character of the 
string matches the corresponding 
character of the pattern. Because the 
optimizer is concerned with identify- 
ing lines of assembly language code, 
we will say that any line containing a 
string described by a regular expres- 
sion matches that regular expression. 
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To specify more complex patterns, 
we need an element that can match 
more than one character in the input 
string. One such useful element is the 
wild card character (.), which will 
match any single character. We can 
also specify one of a group of charac- 
ters by using a character class, which 
consists of a [, followed by a list of 
characters, and ends with a ], to 
match a single occurrence of any of 





i 


the characters enclosed in the square 
brackets. For example, [SL]HLD will 
match SHLD or LHLD. 

We may use a shorthand notation 
for all consecutive letters or digits: [a- 
z| matches any lower-case letter, and 
[ A-Z0-9] matches any upper-case let- 
ter or any digit. If the first character 
of the character class is ~, it negates 
the character class: it will match any 
character except those in the list fol- 
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lowing the ~. For example, [~aA] 
matches any character except a or A. 

Character classes are essential to 
matching constructions such as ‘“‘any 
label.” The standard C identifier con- 
sists of any string of letters, digits, or 
underscore characters that does not 
begin with a digit; thus, the character 
class that matches the first character 
of an identifier is [a-zA-Z__], and the 
remainder of the characters match 
the class [a-zA-Z0-9_ ]. 

To fully describe a label with a reg- 
ular expression, we need a construc- 
tion for “the remainder of the charac- 
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ters” that does not limit us to a! This actually matches an identifier of 


specific number of characters. We 
achieve this by following any charac- 
ter (or character class) by an aster- 
isk, *. The result, called a closure, 
will match zero or more occurrences 
of the single character preceding the 
*. For example, aa* matches any 
string consisting of one or more oc- 
currences of the letter a. The regular 
expression describing a C identifier 
can now be given as: 


[a-zA-Z_ ][a-zA-Z0-9_ ]* 
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unlimited length, but it serves our 
needs. 

We now need some way of specify- 
ing “same label as above.” For this, 
we draw on the ability to group por- 
tions of a pattern and refer to the 
group(s) later. A portion of a pattern 
that appears between the pairs of 
characters \( and \) constitutes a 
group. A group of characters 
matched by a parenthetical pattern 
may be identified by the notation \1 
for the first group in the pattern, \2 
for the second, up to \9 for the ninth. 
For example, 


\(mat\).*\1 
matches mathematician while 
NCC NS 


matches barbarian, mathematician, 
and any string that repeats a group of 
three letters. The notation developed 
so far allows us to describe the exam- 
ple at the beginning of this section 
with two regular expressions: 


SHLD\t\([a-zA-Z_] 
[a-zA-Z0-9_]*\) 
LHLD\t\1 


Finally, it is sometimes useful to 
require that the string matching a 
regular expression occur at the begin- 
ning or end of a line. The characters 
to do this are * for the beginning of a 
line and $ for the end of a line. Thus, 
“A matches any line that begins with 
A, and *$ matches only empty lines. 
Any characters that have special 
meanings (e.g., [ ]*.\*$~-) may have 
the special meaning turned off by 
preceding the special character with 
\. The pattern \.$ matches any line 
that ends with a period. 

This flexible and powerful notation 
suffices to describe most construc- 
tions appropriate for improvement 
with a peephole optimizer. There are 
a few traps for the unwary, especially 
when using closures. Remember that 
x* matches zero or more occurrences 
of x, so that the regular expression x* 
matches any line, even those with no 
x’s at all. When you want to match 
one or more x’s, use xx*. Another 
point is that any closure matches the 
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longest possible string: e.*e matches 
the entire word emergence, not just 
eme or erge. Table | (below) gives 
some more examples of regular ex- 
pressions and the strings they de- 
scribe. For a more extensive discus- 
sion of regular expressions, see 
Chapter 3 of Aho and Ullman’s Prin- 
ciples of Compiler Design.> 


Using the Optimizer 

The description of each improvement 
in the compiler output has two parts: a 
list of regular expressions describing 
the code to be replaced and a list of 
lines of improved assembly language 
code. A group of lines is replaced only 
if each line in turn matches the corre- 
sponding regular expression. The con- 
structions \l, \2, and so on in a re- 


“38 
(.") 


placement cause the replacement to 
contain the same string matched by 
the corresponding “*\( \)” group in the 
list of regular expressions. 

The list of potential improvements 
is placed in a file that is read by the 
optimizer. Listing Six (page 82) 
shows such a file for use with C/80 
compiler output. Each improvement 
consists of the following: one or more 
lines containing regular expressions 
identifying the construction that may 
be improved, a separator line that 
contains a % as its first character, 
zero or more lines that are to replace 
the text matched by the regular ex- 
pressions, and a terminator line start- 
ing with %%. The file may contain 
any number of potential improve- 
ments. In Listing Six, comments de- 


Matches any line with exactly three characters 
Matches any string enclosed in parentheses 


/ \*[ a-zA-Z]*\"*/ 


~~ * 


Matches any C comment containing only blanks and 
letters 
Matches any string of nonblank characters 


\({a-z][a-z]*\)\tJMP\t\ 1 Matches “loop JMP loop” but 
not “loop 1 JVP  ieop 
or “abc JMP Xyz_ 


oa 


\\W\2\1 


ROUTINE 


Matches any string containing two adjacent repeat- 
ed substrings such as beriberi, vacuum, and 
_ tintinnabulation 
Matches affair, accommodate, and this is the end 
(\1="th", \2=“is ”) 


Table 1 


Examples of Regular Expressions and Matching Strings 


CALLS TICKS % TIME (Approx.) 
amatch 81309 9370 27 
omatch 92501 6548 19 
fgets 3149 3707 11 
outline 3103 3541 10 
match 32504 3011 9 
locate 36934 2504 7 
patsize 42331 2331 7 
findsym 1316 1363 4 
strcmp 34942 812 Z 
free 3374 654 2 
optimiz 3103 376 1 
malloc © 3692 287 1 
main 1 112 0 
Table 2 
Profiler Output for Optimizing a Test File 
66 





scribe each improvement; they make 
the output somewhat larger than the 
input and may be removed if desired. 

The program command line syntax 
1s 


opt options infile outfile 


where infile is the name of the file 
containing the assembly language 
source code to be optimized, outfile is 
the name of the file to contain the op- 
timized output (must be different 
from infile), and options represents 
zero or more of the following optional 
parameters: 


-bn Store n lines in the internal 
FIFO buffer. Default is 500. 

-ffile Read the list of improvements 

from fi/e. Default is opt.dat. 

A jump instruction described 

by the regular expression re. 

Default is \tJ[CEMNOPZ]*\t. 

A label described by the regu- 

lar expression re. Default is [a- 

ZzA-Z_\.][a-zA-Z_0-9]*. 

Omit jump optimization. With 

this option selected, the opti- 

mizer can be used as a general 
purpose stream editor. 

An unconditional jump instruc- 

tion described by the regular 

expression re. Default is 

\tJMP\t. 

-v Turn off verbose output. Nor- 
mally opt displays the last line 
of every improvable construc- 
tion on the console; selecting 
this option omits that output. 


-jre 


-lre 


“Te 


The internal organization of the 
program is quite simple. Each line is 
read into a FIFO buffer in memory. 
The size of this buffer determines the 
range of jump instructions that may 
be optimized. The input is compared 
with the regular expressions of the 
improvable constructions, which are 
contained in a linked list. If a match 
is found, the appropriate replacement 
is made. A symbol table containing 
all the labels in the input is main- 
tained for jump optimization. 

Because this article is on optimiza- 
tion, it is appropriate to discuss the op- 
timization of the optimizer. As given 
in Listings Two to Six (pages 68-83), 
the program processes approximately 
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200 lines per minute. Using the opti- 
mizer on its own assembly language 
code saved 199 bytes and increased 
speed by about 2%. Adding to the 
data file some constructions specific 
to the optimizer and reoptimizing 
saved an additional 86 bytes and in- 
creased speed by another 1%, for a to- 
tal improvement of 285 bytes and 
about 3%. A third run, made with a 
data file that replaced calls to the 
pointer dereferencing routine with in- 
line code, increased program size by 
473 bytes and speed by 10%. 

We might wish to improve two sep- 
arate aspects of the peephole optimiz- 
er’s performance. First, consider the 
amount of improvement the optimizer 
makes in the programs it processes. 
We could increase performance in this 
area by finding more improvable con- 
structions in the compiler output and 
adding them to the data file opt.dat. 
Unless we have missed some extreme- 
ly poor and very common compiler 
Output, however, this approach will 
likely produce only a small increase in 
performance. As is usually the case, 
substantial improvement requires the 
use of an improved algorithm. 

Second, consider the speed of the 
optimizer in accomplishing its task— 
presently about 200 lines per minute. 
Once again, small improvements may 
be made by tweaking the present 
code, but major improvements will 
require a change to better algo- 
rithms. By using the profiler included 
in the Software Toolworks’ C/80 
package, we can identify those sub- 
routines of the program that are exe- 
cuted most frequently. The profiler 
output for a run of the optimizer is 
shown in Table 2 (page 66). 

Table 2 shows that the optimizer 
spends over two-thirds of its time 
matching regular expressions to 
strings (match( ) and subsidiary rou- 
tines). Clearly, any significant in- 
crease in speed will require an im- 
provement in the pattern-matching 
code. I have made a small effort 
along these lines by replacing the C 
version of the routine locate( ) with 
an assembly language version. Be- 
cause better algorithms for regular 
expression matching are known, this 
seems like the most profitable course 
for increasing the speed of the pro- 
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gram. In contrast, replacing the lin- 
early searched linked list used for the 
symbol table with a more efficient 
hash table cannot increase the speed 
of the program by more than 4% be- 
cause only 4% of the execution time is 
spent in the routine findsym( ) look- 
ing up symbols in the table. 


Installation 

Although I have endeavored to make 
the program as flexible as possible so 
it will be useful with a variety of com- 
pilers, I have tested it only with the C/ 
80 compiler. Users of other compilers 
will have to construct a data file like 
that in Listing Six for the construc- 
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tions peculiar to their compiler. 
Listings Two to Five are “stan- 
dard” C and should be portable to 
other C compilers. My library follows 
the usage of the Unix (version 7) li- 
brary and differs only slightly from 
the library distributed with C/80 and 
some other C compilers. Listing Sev- 
en (page 83) shows the library func- 
tions used by the optimizer. 
Although I have not tested it, the 
new Small-C library® appears to con- 
tain suitable routines, with the excep- 
tion of the memory management rou- 
tines malloc( ) and free( ). The 
optimizer frees blocks of memory 
without regard to the order in which 
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they were allocated. The C/80 library 
(version 3) also contains suitable rou- 
tines, provided that the error return 
value is changed to 0 (NULL) from -1. 
Listings for suitable memory manage- 
ment routines are also given in Chap- 
ter 8 of Kernighan and Ritchie.’ 


Availability 

I will return a copy of the source code 
and an executable .COM file (for 
CP/M 2.x) to anyone who sends me a 
postage-paid disk mailer, a formatted 
5%-inch disk, and $10.00. I can write 
a large number of single-sided, soft- 
sectored formats but do not have the 
hardware for hard-sectored or 8-inch 
disks. 
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P. eephole Op timiz Cr (text begins on page 56) 
Listing One 


int i, j,m,n3 
while (i == Q) 


t i= 


5+ M3 


mh + 58 


it “Gs 


1) 


j = 9; 


(a) Fragment of 


of: LHLD 
MOV 
ORA 
JNZ 
LHLD 
XCH6 
LHLD 
DAD 
SHLD 
LHLD 
XCHG 
LHLD 
DAD 
SHLD 
LHLD 
DCX 
MOV 
ORA 
JNZ 
LAI 
SHLD 

he JMP 


°Q? DS 0 i 


oe Sa 


" ~DIrw> 3 Oe. 


H,0 iy 


C code 


start of loop 
evaluate i 


; jump out of loop if not true 
jr 8 


. i = 


-. 
2 


; evaluate ; == 1 


; jump if not true 
= 0 


:; loop 
continue with rest of program 


(ob) Assembly language compiler output 
(Comments added) 


«¥i3 LHLD 


URA 
JNZ 
LHLD 
XCHG 
LHLD 
DAD 


SHLD 1 ; 


XCHG 
LHLD 
DAD 
SHLD 
LHLD 
DCX 
NOV 
ORA 
JNZ 


SHLD 
JMP 


{c) Optimized assembly language code 


1 
MOV A,H 
L 


-rTDpreao.. 


~ 
7 


start of loop 
evaluate i == 0 


; jump out of loop if not true 
2 tS fe eon 


os 


redundant LHLD deieted 


evaluate ; == 1 


3; JNZ to JMP improved 
LXI H,O removed following in line test 


~. 


sf 
»g3 DS Q 


continue with rest of program 


End Listing One 


Listing Two 


7% aoptdefs.h -- 


/BCKTAEKS ETI ESS 
4 Copyright 1 
% All riqhts 
% Fermission 
SRTGTAKRA VET TALE 


/% Standard defi 


EOF 
NULL 
TRUE 
FALSE 
MAXSTR 
FILE 


#define 
#define 
define 
#define 
#define 
#define 


/% Definitions # 


#define MAXLINES 
#define JTSIZE 
#define LBLLEN 
#define OPTIONS 
#define LBLTERM 
#detine SYMLEN 


Definitions and declarations for peephole optimizer. *¥/ 
SETAE ASARAT KER ERS AES 

984 by David L. Fox 

reserved. 

is aranted for unlimited personal, non-commercial use. 
ERATE RERARTA RARER ARE / 


nitions (stdio.h) %/ 
-1 
oO 
1 


oO 
256 /% Maximum string length &/ 
int /% File descriptor type %/ 


or optimizer &/ 


500 /% Lines of source in memory %t/ 
10 /% Entries in jump list table %/ 
15 /% Maximum label length %/ 


"BrF:J:L:0U:V" /% Legal options %/ 
age /% Character which terminates a label %/ 
8 /% Symbol (label) length &/ 
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#define UNDEF 0 /% Undefined symbol] %/ 

#define INBUF i /% Symbol defined and in buffer %/ 

#define OUTBUF 2 /% Syabol written to output. removed froa 
buffer %/ 

#define UNJMFD 3 /t Syabol is label of JMP, replaced with 


destination &/ 
4% Structure declarations &/ 


struct Ikline ¢ /% Linked list of lines &/ 
struct Ikline tnextln: /8 Link to next line t/ 


char $8ln;: /% This line &/ 

>: 

struct trfmn ¢ /% Transformation from old to new code %/ 
int nold; /% Nuaber of lines in old construction */ 
int nnew: /t Number of lines in new construction %/ 


struct lkline told; /t Linked list of old reg. exprs. %/ 
struct Ikline tnew; /t Linked list of new substitutions &%/ 
struct trfmn tnexttr; /@ Link to next transformation %/ 

3 


struct jmp_Ist ¢ 
int njmp; 
int jlines(JTSIZE); 
struct jmp_Ist %jlnext; 


/* List of lines with jueps to a label) &/ 
/t Line nos. containing jump to label %/ 
3 
struct syat ¢ /% Syabol table entry &/ 
char sname(SYMLEN+t1 ); 


int lineno: 
char scode; 


/% Line number in buffer &/ 
/% Status: undefined, in buffer, 
written out, replaced &/ 
struct jmp_ist %japlst; 
struct symt %snext; 
d3 


/% Definitions for regular expression code %/ 


define MAXPAT (2%*MAXSTR) 
#define CLOSIZE 1 /% Size of a closure entry &/ 
@define CLOSURE ’8’ 


#define BOL ie 
#define BOLSTR °*" /% String consisting of BOL &/ 
tdefine EOL ~*~ 
tdefine ANY iS” 
#¢define CCL ot 


#define CCLEND ’)’ 
define NEGATE ’~’ 
#define NCCL oe 
#define LITCHAR ’c’ 


/t Cannot be the same as NEGATE. &/ 


#define ENDSTK ’\Q’ 
#define NEWLINE ” \n’ 
#define ESCAPE ’\\’ 
#define DASH wre 


#detine GRFST a 
@define GRFEND ’)’ 
#define GRPFAT ’"* 
#define DITTO -1 


/t Codes for grouping and subpatterns %/ 


/% tdefine 780 /*t Insert this define if you have 


a 280 processor. %/ 


End Listing Two 


Listing Three 


/% optglob.c -- Global variable declarations for optimizer. %/ 


/TEAETAETETETTRITASTTCSSS SSS SS Esssssss 

% Copyright 1984 by David L. Fox 

% All rights reserved. 

8 Permission is granted for unlimited personal, non-commercial use. 
SECRESTATKTLTTAES STS TATIS STAT SIRS TI sss / 


char t8linep; /% Array of pointers to lines %/ 
int nlines = 0; /% Nuaber of lines %/ 
int frstin; /t Index of oldest line in buffer 8/ 
int curln; /% Current line in buffer %/ 
FILE infds /t Input file descriptor &/ 
FILE outfd; /% Output file descriptor %/ 
unsigned maxlines = /% Lines in buffer &/ 

MAXLINES; 
int verbose = TRUE; /t Verbose output flag %/ 
int japopt = TRUE: /% Flag for jump optimization &/ 
int optind = 0; /% Index of next argument %/ 
char toptarg: /% Pointer to option arquaent %/ 


struct trfan ttrans; 


char tpatfile = “opt.dat\O\O\O\O\O\OV\0"; /t File tor optimization 
data %/ 

char tlbl = “Ca-zA-2Z_\.Jfa-zA-Z0-9_]3"; /% Label teaplate %/ 

char tjapins = “\tJCCEMNOPZI8\t"; /* Jump instruction 


template %/ 
char Bucjap = “\tJMP\t"; /% Unconditional jump &%/ 
/* Pointers to patterns aade 
from reg. expr. %/ 


char 8lblipat, *%jappat, Sucjpat; 


struct syat frstsym = ¢ 
€7N0":3, /% sname %/ 
Fi, /t lineno &/ 
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P. eephole Op fimiz er (Listing continued, text begins on page 56) 


Listing Three 


Q, /% scode %/ 
NULL, 7% jmplst &/ 
NULL}; /&% snext &/ 


struct syat %syatab = %frstsya; 


/% Start of symbol table %/ 


/% Global variable declarations for regular expression code %/ 


char pat{MAXFAT); /% Space for pattern %/ 
int lparen, rparen; /% Parenthesis counts %/ 
char &s&qstart(10]; /% Pointers to start of grouped text %/ 
char &gend([10); /% Pointers to end of grouped text %/ 
char &lgp;: /% Pointer to start of last group ¢&/ 
End Listing Three 
Listing Four 


/t oapt.c -- Assembly language optimizer &/ 


/BGTTESTTAT STATIS ASE SEES Eee e eee KEES 


3 Copyright 1984 by David L. Fox 


% All rights reserved. 


3 Permission is granted for unlimited personal, non-commercial use. 
BISRIAT ATA AT ATI RST TAIT eee IEE / 


/% 


Performs peephole and jump optimization of an assembly language 
source file. Transformations for peephole optimizer are specified 


in file opt.dat as follows: 


regular expressions 
for matched lines 

% 

replacement lines 
X% 


Command line syntax is 


opt [ -bnn -ffile -o -lre -jre -ure -v J] infile outfile 


where the aptions are 


-bnan Use nn lines in the FIFO buffer (default=1000). 
-ffile Read peephole optimization information from file instead 


of opt.dat. 


-oO Do not do jump optimization. 

-lre Labels defined by regular expression re. 

-jre Jump instructions defined by regular expression re. 

-ure Unconditional jump instruction defined by regular 
expression re. 

-Vv Verbose output off. 

/ 

#include "b:roptdefs.h" 

#include "b:optglob.c* 

*#include “b:restuf.c" 


‘% Main program %/ 


main(arqc, argv) 

int arac; 

char t¥arav; 

{ 

char inline(CMAXSTR], &s, tlines; 
int 65.1% 

char &p, %q; 

FILE patfd; 


char &fqets(), tnewline(), *makepat(), %strcpy(); 


struct syat %symp, tchksym(); 


4% Initialization %/ 
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SECTOR EITE 
oi 


ANYWHERE 


j 
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frstin = 0; 
curln = maxlines - 13 


/% Create patterns for jumps and labels from regular expressions */ 
/% Allocate memory. %/ 
if ((lblpat = sbrk(MAXSTR)) == -1 [3 
(jmppat = sbrk(MAXSTR)) == -1 ti 
(uc jpat = sbrk(MAXSTR)) == -1) 
error ("Not enough memory") ; 


/% Create patterns. %/ 


p = lblpat; 

makepat(lbl, ’\0’, lblpat, &p); 

p = jappat; 

makepat(jmpins, ’\0’, jmppat, &p); 


p = ucjpat; 
makepat(ucjmp, ’\0’, ucjpat, &p); 


/% Allocate memory for groups. k/ 


for (i =-l3 1 -¢ 103 443) 
gstartCi] = sbrk(MAXSTR); 
if (gstart(i0) == -1) 


error(“Not enough memory"); 


/% Process options. &%/ 


while ((c = getopt (argc, argv, OFTIONS)) != EOF) 
{ Switch(c | 0x20) { 

case ’b’: /% Set FIFO buffer size. &/ 
maxlines = atoi (optara); 
break; 

case ’#’: /% Set data file name. &/ 
strcpy(patfile, optarg); 
break; 

case ’1’: /t Rie. for labels &/ 
p = lblpat; 
makepat(optarg, ’\0’, lblpat, &p); 
break; 

case ’j5’: /&t R.e. for jumps %/ 
p = jappat; 
makepat(optarg, ’\0’, jmppat, &p); 
break; 

case ’0’: 4% Omit juap optimization. %/ 
jmpopt = !jmpopt; 
break; 

case ’u’: /t R.e. for unconditional juaps %/ 
p = ucjpat; 
makepat(optarg, ’\0’, ucjpat, &p); 
break; 

case ’v’: /&% Switch verbose output. %/ 
verbose = !verbose}; 
break; 

default: 


error("usage: opt C -bnn -ffile -lre -jre -ure -v J\ 
C infile C outfile ] J"); 
} 

} 
/% Read optimization data file. %/ 
patfd = mustopen(patfile, “"r"); 
gettap! (patfd); 
#close(patfd); 


/% Allocate memory for FIFO buffer. %/ 
if ((linep = sork(maxlinestsizeof (char %))) == -1) 
error ("Not enough meaory"); 


/% Set up i/o channels. %/ 
outfd = stdout; 


infd = stdin; 
if (argc > optind) 
{ infd = mustopen(argvloptind+t+], "r"); 


if (argc > aptind) 
outfd = mustopen(argvloptind++), “w"); 
} 


/% Main loop */ 
while ((s = fgets(inline, MAXSTR, infd)) != NULL) 
{ newline(s); 
/& Update symbol table. %/ 
if(jmpopt && (symp = chksym(curln)) '= NULL) 
unjump (symp) ; /&% Remove jumps to JMP. 
/%t Optimize current line. %¥/ 
optimize(curln); 


u/ 


} 
fclose(infd); 


/%* Output contents of FIFO buffer. %/ 
while (frstin '= curln) 
outline(); 
outline(l); 
if (outfd '= 0) 
#claose(outfd); 
) 


/% newline -- Add a line to buffer, output some old ones to make space 
if needed. Update frstin, curln, and nlineas. 

%/ 

char & 


newline(str) 
char %&str; 
C 
char %s, &%strcpy(), tmalloc(); 
/% Check for buffer wrap around. &/ 
if (++curln >= maxlines) ¢ 

curln = 0; 
} 


while (nlines >= maxlines i: (s = malloc(strilen(str)+1)) == NULL) 
{ /% Make some space %/ 
outline(); 
} 
++nlines; 
return(linep(curln] = strcpy(s, str)); 
} 
/% optimize -- Look for improvable code and make improvements %/ 


optimize(ln) 

int In; 

{ 

struct trfmn tp; 
int n, a; 

char %s; 

struct lkline to; 


/% Loop through all possible transformations. %/ 
for (p = trans; p->nexttr '= NULL: p = p-Dnexttr) ¢ 
/* Check lines in buffer against r.e. in transformation. %/ 
lparen = rparen = 0; 
for (n = p->nold, o = p-dold; 
n > O && match(linepCl (m=ln-nt+1) 0= 0 2? m 
o- >in); ==), ¢ 
Oo = o->nextln; 


m+maxlines], 


(Continued on next page) 
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P. eeph ol e Op f imiz er (Listing continued, text begins on page 56) 


Listing Four 


) 


if (n > 0) /% No match, skip to next transformation. %/ 
continue; 
if (verbose) /% Print last line matched. %/ 


fprintf(stderr, "MATCH---%s", linepCIin)); 
/t Replace matched lines with improved code. %/ 
if ('subst(ln,p)) 

error ("substitute failed"); 


} 

} 

/% unjump -- Route jumps to jumps directly to target %/ 

/% syp is pointer to symbol table entry for label on JMP %/ 


unjuamp (syp) 

struct symt %tsyp; 

{ 

char &p, dpat(MAXSTR); 

int 1, errflg; 

struct symt tdsyp, *isjmp(); 
struct jmp_Ist %jp; 


if (syp->scode == OUTBUF) ¢ 
/% Target is not in memory. &/ 


fprintf(stderr, “Zs not in buffer\n", syp->sname); 
for {jp = syp->jmplst; jp !'= NULL; jp = jp->jlnext) 


free(jp); /&% Release memory used by jump list. %/ 


errflg = TRUE; 


else ( /* Target is in memory. %/ 
errflg = FALSE; 
if ((dsyp = isjmp(linep{syp->lineno])) == NULL) 
{ message (linep(syp->lineno]); 
_ error("Not a jump"); /% "Can’t happen." %/ 
) 


/t Make literal pattern for substitutions %/ 
for (p=syp->sname, i=0; %p != ’\O’3 ++p) 
{ dpatflit++] = LITCHAR; 
dpatlit++] = Sp; 
) 


dpat(i++) = CLOSURE; 
doat(i++) = LITCHAR;: 
dpatli++) = LELTERM; 


doatlil] = ’\u’; 
/% Keplace destination label for every entry in jump list. %/ 
jp = Syp-Djmplst; 


for (jp = syp->jmplst; jp != NULL && jp->njmp >= OF jp = jsp->jlnext) 


{ for (i=O3; i < jp->njmp;y ++i? 
{ if (!'subline(jp->jlineslil, dpat, dsyp->sname) ) 
€ errflg = TRUE; 


fprintf(stderr, 
"Cannot substitute “Zs in %s\n", 
dsyp->sname, linep( jp->jlineslilJ)); 
} 
/% Add new reference to jump list %/ 
add jmp (dsyp->sname, jp->jlineslil); 
} 
free(j;p); 
} 
} 
syp->jmplst = NULL; 
if (‘'errflg) /t Delete label from target. %&/ 
{ if ('!subline(syp->lineno, dpat, “")) 
fprintf(stderr, 
"Failed to delete “%s in %s\n", 
dpat. linep[{syp-)>lineno)); 
Syp->scode = UNJMPD; 
} 
} 


/% 1/0 routines for optimizer %/ 


/% outline -- Output a line from FIFO buffer. t/ 


outline () 

{ 

struct symt %s, tislab(), tisjmp(); 
struct j;mp_list jp; 


if (lineplfrstin) '= NULL) ¢ /% If line not deleted %/ 
fputs(linepl[frstin], outfd); 
4% Check for labels and jumps. %/ 
if ((s = islab(lineplfrstln}))) '= NULL) 
s->scode = QUTBUF; 
if ((s = isjmp(linep({frstln1])) '= NULL) 
{ s->scode = OUTBUF; 
/% Delete jump list. &/ 
for (j;p=s->jmplst; jp '= NULL; jp = jp->jlnext) 
free(jp); 
s->jmplst = NULL; 
} 
--nlines;: 
free(lineplfrstin)):; 
} 
/* Check tor bufter wrap around. &/ 
if (++frstin >= maxlines) ¢€ 
frstin = Q; 
} 
} 
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/% aqettmpl -- Get templates for changes. %/ 


gettmpl (fd) 


FILE td; 
{ 
int n3 


struct trfmn %t; 

struct lkline #1, #11, Smm, tnewlk(); 

char line(MAXSTR], ts, 4p; 

char %fgets(), tmakepat(), kmakesub(), X%strcpy(); 


/% Allocate memory for first transformation. %/ 
t = trans = (struct trfmn 8) sbrkisizeof (struct trf#mn)); 
t->nexttr NULL; 


while ((s = fgets(line, MAXSTR, #d)) '= NULL) 

{ lparen = rparen = 0; /% Initialize parenthesis counters. %/ 
1l = &t-Ddold; 
t->nold = t->nnew = 0; 


while (8s '= °%’ && s != NULL) 

p = pat; 
if (makepat(s, ’\n’, pat, &p) == NULL) 
{ message (line); 


error ("bad r.e."); 
} 
1 = newlk(ll, pat); 
11 = &l->nextin; 
++t->dnold; /&% Increment line count. */ 
Ss = fgets(line, MAXSTR, fd); 
} 
if (s '= NULL && strncmp(s, "Z4", 2) '= 0) 
{ mm = &t->new; 
while ((s = fgets(line, MAXSTR, #d)) '!= NULL && 


strncap(s, "44", 2) '= 0) € 
/% Get replacement strings. %/ 
if (makesub(line, ’\n’, pat) == NULL) 
{ message (line); 
error("bad sub string"); 
} 
1 = newlki(am, pat); 
mm = &1->nextln; 
++t—nnew; 
} 
} 
/* Allocate memory for next transformation. %/ 
t->nexttr = (struct trfmn %) sbrklsizeof (struct trfmn)); 
t = t->nexttr: 
t->nexttr = NULL; 
} 
> 


/% newlk -- Create a new Ikline structure. %¥/ 


struct lkline 

newlk(lkp, str) 

struct lkline t&lkp; /t Address of pointer to next member of 
linked list. %&/ 

char &str; 

{ 

char &strcpy(); 

struct lkline tl; 


if ((1 = (struct lkline &)sbrk(sizeof (struct Ikline))) == NULL) 
error ("memory full"); 

Slkp = 1; 

if (()1->ln = sbrki(strlen(str)+i)) == NULL) 
error ("meaory full"); 

strcpy(l->ln, str); 

1->nextin = NULL; 

return(1); 

} 


/% sttecpy -- Copy string between start and end pointers. &/ 
char 8 

sttecpy(dest, start, end) 

char %dest, %start, tend; 

{ 

char pp; 


for (p = dest; start < end; ) 


p++ = &start++; 
tp = ’\0’;3 
returnidest); 


) 


/ETSCLT SLES SAKATA EKER AEE ES Sa ee eek sss / 
/% Symbol table routines for optiamizer. %/ 


/% addsym -- Add a label to the symbol table. %/ 


struct symt 8 

addsyam (name) 

char fname; 

{ 

char &p, %q, ¥strcpy(); 

static struct symt ts = Sfrstsya, tsret; 


strcpy(s->sname, name); 


(Continued on page 74) 
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Listing Four 


$->lineno = ~-1; 

s->scode = INBUF; 

if ((s->snext = malloc(sizeof(struct symt))) == NULL) 
error ("symbol table overflow"); 

sret = s; 

S = s-)snext; 

5->snext = NULL; 

s->jmplst = NULL; 

return(sret); 

} 


/% addjmp -~ Add line number to list of jumps to label. %/ 


addjmp (name, linena) 

char fname; 

int lineno; 

{ 

char &p, ka: 

struct symt %symp, %findsym(), *addsym(); 
int n¢3 

Struct jmp Ist %& jp; 


if ((symp = findsym(name)) == NULL) 
{ Symp = addsyn(name); /% Symbol not found, add it to table. %/ 
symp->scode = UNDEF; 
) 
jp = &Symp->jmplst; 
/& skip to end of jump list 8/ 
while (8jp '= NULL && (&jp)->njmp >= JTSIZE) 
jp = &(8jp)-djlnexts /% Skip to last block of jump list. %/ 
if (&jp == NULL) /% Allocate space for new block. %/ 
{ if ((8jp = malloc(sizeof(struct jmp_lst))) == NULL) 
error("jump list overflow"); 
else /% Initialize new block. %/ 
{ (tjp)-njmp = 0; 
(83j3p)->jlnext = NULL; 
} 
} 
(8jp)->jlinesl(%jp)->njmpt++) = lineno; 
} 


/% findsym -- Linear search of symbol table. %&/ 


struct syat 3% 
findsym(name) 
char %name; 

{ 

struct symt %s; 


for (s = &frstsym; s->snext '= NULL; s = s->snext) 
if (strcmp(s->sname, name) == 0) 
return(s); 
return(NULL); 
} 
/% chksym -- Check for a labeled line or line with a jump. %/ 


struct syat % 
chksym(curln) 
int curln; 
{ 
char &sttecpy(); 
struct symt %&syp, %s, taddsym(), Sislab(), ®isjmp(); 
if (syp = islab(linepCcurln]))) 
syp->lineno = curln; 
if (syp->lineno = -1) /% First time for this line. &/ 
syp->lineno = curln; 
if ((s = isjmp(lineplcurln])) '= NULL) 
add jmp(s->sname, curln); 
if (syp '= NULL) 
4 if (match(linep{Ccurln), ucjpat) '= NULL) 
return(syp)¢; /% Labeled unconditional jump. %/ 
} 
return(NULL); 
} 


/% islab -- If str points to a valid label return pointer to its 
entry in symbol table, else return NULL. %/ 


struct symt & 
islab(str) 
char %str; 

{ 
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Char %p, %q, nmame([LBLLEN], fkamatch(), tsttecpy(); 
struct syat %syp, %addsym(); 


p = lblpat; 
if (({q = amatch(str, str, &p)) '= NULL) ¢ 

if((syp = findsym(sttecpy(name, str, q))) == NULL) ¢ 

syp = addsym(name); 
} 

} 
return(syp); 
} 


/*% isjmp -- If line contains a jump instruction 
return pointer to its destination label symbol table entry 
otherwise return NULL. %/ 


struct symt % 

isjmp (line) 

char $line; 

{ 

char &p, &q, %r, name(LBLLEN); 
struct symt %syp, tfindsya(); 
char famatch(), &sttecpy(); 


syp = NULL; 
if ((p = match(line, jmppat)) != NULL) ¢ 
q = Iblpat; 
if ((r = amatch(p,p,%&q)) '= NULL) ¢ 
sttecpy(name, p, r); 
if ((syp = findsym(name)) == NULL) 
syp = addsya(nanme); 
} 
} 
return(syp): 
} 


ATTKEKTT SAITEK TEREST ARETE ESE EE/ 
/% Utility routines %/ 


/% agetopt -- Unpack options from arq list. ¥/ 
/% Arac and argy are argument count, and values from main. 
Optstr 15 a string of legal option letters. 
Getopt returns the next option letter from argv. 
lt the letter in optstr is followed by *:’ the external 
pointer optarg is set to point to the argument 
following the option letter. 
The external variable optind is set to the index of the 
next argument in the argv array to be processed. 
If an illegal option is found, getopt returns ’?’ 
If the next argument in argv is not an option 
getopt returns EOF 


t/ 


getopt(arac, argv, optstr) 
int argc: 

char kargvlJ), ‘*optstr; 

{ 

Static char %cp; 

char %p; 

char &strchr(): 


if(aoptind == 0) 


cp = arav(++optind) + 1; /% First call &/ 


if (%8arqvloptind]) != ’-’ ti optind >= argc) 
return(EOF); /*% No more options &/ 

if(%co == ’-") 

{ +t+optind; 


return(EOF); /% End of options #/ 
} 
if((p = strchr(optstr, %cp++)) == NULL) 


{ fputs ("unknown option: “, stderr); 


putc(s(cp-1), stderr); 
putc(’\n’, stderr); 
if(&cp == ’\9’) 
cp = argv[(++toptind) + 1; 
return(’?’)s3 
} 
if(&(p+l) == ’;:’) 
{ if(%cp == ’\0’) /% Get arqument &/ 
optarg = arqv(++optind]); 
else 
optarq = cp; 
cp = argqv(+toptind] + 13 


else 
if(acp == ’\0’) 
cp = arav(++toptind) + 1; /* Set up for 
next arav. &/ 
return(%8p); 


} 


/% message -- Send a message to the console (stderr) and return. %/ 
message(s) 

char *s(); 

{ 

fputs(s, stderr); 

putc(’\n’, stderr); 

return(Q); 

} 


(Continued on next page) 





Release 2.0 


C-INDEX 


Variable Length Record Management For C 


C-INDEX is a state-of-the-art data management 
function library for C programmers. Ideal for all 
data and text based applications. No other package 
can give you the performance, capability, and port- 
ability of C-INDEX. To make sure you are a satisfied 
customer, we offer a 30 day money-back guarantee. 
Ask us about it. 


¢ variable length data storage with B+Tree indexing 
«high performance, easy to use 

¢ large and small models, fully transportable source 
*IBM PC format: Lattice, Microsoft, C86, others 


* Macintosh format: Consulair, Manx, others 


C-INDEX/FILE ($99) | Object code package. 


C-INDEX/PRO ($195) Partial source code, 
no royalties. 


C-INDEX/PLUS ($395) Complete transportable 


source code, no royalties. 


stems 


2210 Wilshire Bivd., Suite 289 
Santa Monica, CA 90403 
213/394-0796 


Trio 





Circle no. 20 on reader service card. 


Dr. Dobb’s Journal, August 1985 





You read Dr. Dobb’s Journal 
And You Don’t Subscribe?! 


Save over $23.00 off 
newstand prices for 2 yrs. 


Save over $10.00 for 1 yr. 


Can you afford to miss an issue with 
information vital to your interests? As a 
subscriber you can look forward to articles 
on Small-C, FORTH, CP/M, S-100, Compiler 
optimization, Concurrent Programming 
and more, delivered right to your door. 
And you'll never miss the issue that covers 
your project. 


YES! Sign me up for __ 2 yrs. $47 


__ A yr. $25 


___ | enclose a check/money order 

___ Charge my Visa, MasterCard 
American Express 

____ Please bill me later 


Name 


PE cio cee kl el ee ee ae 


Credit Card 
Account No. 


Ex: Core us 


OES a i aa egg eae eee 
This offer good in U.S. only 3043 
Dr. Dobb’s Journal, 2464 Embarcadero Way, Palo Alto CA 94303 


75 


P ee ph ole Op timiz @F (Listing continued, text begins on page 56) 


Listing Four 


/% mustopen -- Attempt to open a file, exit on failure. %/ 


FILE 

austopen(name, mode) 

char &name, taode; 

{ 

FILE fd 

if( (fd = fopen(name, mode)) == NULL) 


{ fputs(name, stderr); 
error(": cannot open file"); 

) 

return(fd); 

} 


7% message -- Send a message to the console (stderr) and exit. %/ 
error (s) 

char ts; 

{ 

fputs(s, stderr); 

putc(’\n’, stderr); 

fclose(stderr); 

exit); 


) End Listing Four 
Listing Five 


/t restuf.c -- Regular expression routines. %/ 


/% These routines are translations into C of the reqular expression 


z matching and pattern generation routines in 

t B.W. Kernighan and P.J. Plauger, “Software Tools in Pascal" 

x chapters 5 and 64. 

x The major extension is the addition of code to allow matching and 
t substitution of parts of expressions using \{...\) for 

4 grouping and \n for replacement. 

4/ 


/% match -- Find match anywhere on line. &/ 
matchi(lin, pat) 

char S8lin, pat; 

char tamatch(); 

{ 


char pos, %lst, %p; 
Ist = lin; 
for (pos = NULL; %lin != ENDSTR && pos == NULL; ++lin) 
( p = pat; 
pos = amatch(Ist, lin, kp); 
} 


return(pos); 
} 


/% amatch -- Anchored match %/ 

/% Look for match between lin and pat. %/ 

/% Return pointer to next unmatched character in line, 
or NULL if no match. %/ 

/% lst 1s pointer to start of line. %/ 

/t lin 1s pointer to current position in line. #/ 

/% tppat is pointer to current position in pattern, 
updated if match found. %/ 


char & 

amatch(list, lin, ppat) 
char &lst, ¥lin, %*ppat;: 
{ 

auto char Slp, tmp, &tp; 
auto int level, skip; 
char tpat(MAXPAT); 

Char &strcpy():; 


while (8&%ppat '= ENDSTR) 
{ Switch(%&ppat) <¢ 
case CLOSURE: {¢ 


ippat += patsize(*ppat); /t Step over closure. %/ 


for (lp = lings 8lp '= ENDSTR; ) 
if (! omatch(lst, &lp, &ppat)) 
break; 

if (&(tp = fppat + patsize(*ppat)) == GRPEND) 

{ skip = patsize(tp); /*% At end of group, skip 
over group closure. k/ 

} 
elise 

skip = 0; 


/% lp points to input character that made us fail. %/ 
/% Match rest of pattern against rest of input. 4&/ 
/% Shrink closure by 1 after each failure. 4/ 
while (lp >= lin) 
x tp = X*ppat + patsize(%ppat) + skip; 

if (skip) 

gend(lparen] = gstartClparen] + 
(int) (lp - lgp); 
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if ((mp = amatch(lst, lp, &tp)) !'= NULL) 
if (skip == 0) 
t tppat = tp; 
return(mp); 
} 
else 
{ tppat += patsize(tppat) + skip; 
return(lp); 
} 
else 
lp--3 
} 
return(NULL); 
/% If mp == NULL tailure, else success. %/ 
} 
case GRPST: ¢ /* Start of group %/ 


mp = %ppat: 
tppat += patsize(kppat); 


level = ++lparen; 
strcpy(astartllevel), lin); 
lap = lin; 
if ((lin = amatchi(lst, lin, ppat)) == NULL) 
{ tppat = mp; 
--lparen; 


return (NULL) ; 
) 
gend(level) = 
break; 


gstartClevel] + (int) (lin - lap); 


) 
case GRPEND: € /% End of group %/ 
Sppat += patsize(sppat); 
t++rparen; 
return(lin); 
} 
case GRFFAT: € /% Match previously found group. %t/ 
if (({level = (%ppat)(i)] - 70’) < 1 ti level > 9) 
< message (%ppat): 
error(" amatch: can’t happen"); 
} 
Xppat += patsize(fppat); 
if (gend(level] > gstart{level] + MAXSTR/2) 
return(NULL); /% Group is too long for tpat. %/ 


/% Make temporary pattern from matched group. %/ 


for (tp = tpat, lp = gstartClevel); ip < gendllevell; ) 
{ 3tp++ = LITCHAR; 
Xtp++ = Ilptt; 
} 
%tp = ENDSTR; 
tp = tpat; 
i¢((lin = amatchilst, lin, &tp)) == NULL) 
return (NULL); 
break; 
} 
default: 
if (omatch(lst, klin, &ppat)) 
{ %ppat += patsize(&ppat); 
} 
else < 
return(NULL); 
} 
} 
} 
return(lin); 
} 


/&% omatcn -- Match one pattern element at pat. %/ 


omatch(lin, lino, pat) 
Char *klin. &&lino. Xkpat;: 
{ 


char klpos: 
int advance: 


advance = 
lpos = 


~12 
Slinp; 


af (%lpos == ENDSTR) 
return(FALSE); 

Switch(kpat) 

€ 


case LITCHAR: 
if (8lpos == pat(1i)) 
advance = lI; 


break; 
case BOL: 
if (lpos == lin) 
advance = 0; 
break; 
case ANY: 
if (#lpos '= NEWLINE) 
advance = 13 
break; 
case EOL: 
if (%lpos == NEWLINE) 
advance = 0; 
break; 
case CCL: 
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P. ee ph ol e Op f imiz er (Listing continued, text begins on page 56) 


Listing Five 


if (locate(8lpos, &(pat{t]))) 
advance = 1; 
break; 
case NCCL: 
if (Slpos '= NEWLINE && ! locate(tlpos, &(pati1)))) 
advance = 1; 
break; 
default: 
message (pat); 
error("in omatch: can’t happen"); 
} 
if (advance >= 0) 


default: 

message (pat); 

error("in patsize: can’t happen"); 
} 
> 


/% locate -- Look for c in character class at pat. x/ 
locate(c, pat) 


char c,. %pat; 
{ 


{ Zlinp += advance; 3 are es 

Res /% /&% Size of class 15 at pat, characters follow. %/ 
; 4% for(i = &pats i > O; --i) 
else 

return(FALSE) ; Fix if (c == patCi)) 
) /t { return(TRUE); 

/% } 

/% patsize -- Returns size of pattern entry at pat. %/ /t} 


/&% return(FALSE): 
C code commented out. %/ 
#asm 


; Assembly lanquage version for speed 
Switch (pat) POP 


patsize(pat) 
char X*pat: 
{ 


B :return address 
( FOP H ipat 
case LITCHAR;: FOF D sc 
case 6RPPAT: PUSH D :restore 
return(2); PUSH H ; the 
case BOL: PUSH B : stack 
case EOL: MOV c.M ;get count (%*pat) 
case ANY: MVI k,0 
case GRPST: MOV A,E ic into A 
case GRPEND: INX H spoint to first character 
return(1); #ifdef Z380 
case CCL: DE OEDH, UB1iH 3280 CPIR instruction 
case NCCL: JZ locfnd ;jump if c found 
return(patCi] + 2); #else 


case CLOSURE: 
return(CLOSIZE); 


locip: MOV E,M ;get char 
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CMF 


¢compare with c 


JZ loctnd ; jump if match 
INX H ;increment pointer 
DUX B j;decrement count 
MOV D.A j;save A 
MOV A.B 
ORA C ;test for BC == 
MUV A,D ;restore A 
JN2Z loclp ;loop if BC '=0 
#endif 
LXI H,FALSE ;return FALSE if not found 
JMP locend ;exit from end for profiler 


locfnd: LXI 


H, TRUE j;return TRUE if found 


else 
¢ addpat(LITCHAR, stpat, ppat); 
tmp = esclarq);: 
addpat(%targ, stpat, ppat); 
arq = tmp - l¢ 
} 
lastp = Ip: 
arqgtt; 
} 
if (8arq '= delim) 


return(NULL); 
if(' addpat(ENDSTR, stpat, ppat)) 
return(NULL); 


locend: DS oO 


if(lparen '= rparen) 


#Hendasm return(NULL) ; 
} return(ara); 

} 
/* makepat -- Make pattern from arg, terminate at delim. %/ 

addpat(c, stpat, ppat) 
char % 


makepat(araq, delim. stpat, ppat) 
char delim, %arq, ¥stpat, *%opat; 
( 

char %lp, %stara; 

char tlastp, %tmp, %esc(); 


starg = arag 
lastp = ¥ppat; 
while (%arqg '= delim && *tarq != ENDSTR) 
( lp = %ppat; 
if (%arq == ANY) 
addpat (ANY, stpat,ppat); 


else if (%arg == BOL && arg == starg) 


addpat (BOL, stpat,ppat); 
else if (%arq == EOL) 

addpat(EOL, stpat,ppat); 
else if (8arq == CCL) 


{ if (' getccl (kara, ppat, stpat)) 


return(NULL); 
} 


else if (tara == CLOSURE && arg > starg) 
{ 3# (#(1lp = lastp) == BOL iit 


return(NULL); 


stclose(ppat,lastp,stpat); 


else i¢ (*arq == ESCAFE && argli) == ’(’) 
{ addpat(GRPST, stpat, ppoat); 


arg t= 2; 


if (++lparen > 9) return (NULL); 
if ((arg = makepat(arg, delim, pat, ppat)) ‘= NULL) 


~~arg3 
else 
return (NULL) ; 


else if (*arg == ESCAFE && argli) == ’)’) 
{ addpat(GRPEND, stpat, ppat); 


++rparen; 
return (arg+2); 


EOL 
/%t Closure on a null string 
not allowed. 


char c, %8ppat, %stpat; 


{ 


if (&ppat - stpat > MAXPAT) 


return (FALSE); 
S(&ppat)++ = ce 
return(TRUED; 
} 


/% Add c at ppat, check for overflow. %/ 


/% qgetccl -- Expand char class at arg into pat. %/ 


qgetccl(arap, oato. stoat) 
char &8araqp, &%patp, *stpat; 


{ 

char fccst; 
(targp) ++; 
if (%#argp == NEGATE) 


{ addpat(NCCL, stpat, 


{farqp)++; 
) 
else 


/% skip C &/ 


patp); 


addpat(CCL, stpat, patp); 


ccest = %patp;: 


$+} klp == CLOSURE) addpat(0,stpat, patp); 


} 


/% space for count &/ 
dodash(CCLEND, argp, stpat, patp); 
/ tcest. = tpatp.- cest.'-«13 

return(4fargp == CCLEND); 


/% stclose -- Insert closure entry at &patp. %/ 


stciose(patp, lastp, stpat) 
char &&8patp., tlastp. tstpat; 


{ 
char foo, %a: 


for (pp = &patp - 1: pp >= lastp; pp--) 


{ q = po + CLOSIZE; 


audpat(%pp, stpat, &Q); 


z 
Spatp += CLUSIZE: 
ZSlasto = CLOSURE; 


else if (f*arqg == ESCAPE && (’0’ ¢ argli) && arglil <= °9’)) } 


{ addpat(GRPPAT, stpat, ppat); 
addpat(arq(iJ], stpat, ppat); 


+tarq; 


/% esc -- Map %str into escaped character, return pointer to 


next character. 


(Continued on next page) 





THE HAMMER 
Software Tools in C 


More than just BIOS/DOS access, 

THE HAMMER Library also provides routines for 
multi-level 123-like menus, easy data entry 
& verification of strings, numbers, & dates, 
screen attribute control, date & time pro- 
cessing, AND MORE. 


Super data entry routines give programmer a 
natural, strong interface with the user. They 
work in both “single-field” and “multi-field” 
(full screen editing) modes. This is NOT just 
another library of general purpose routines. 


For: IBM/PC family with DOS 2.00+ 
C Compilers: CI-C86, Lattice, DeSmet, and new 
Microsoft V3.00 


$195 with source code and manual. To order 
or inquire, CALL OR WRITE: 


O.E.S. SYSTEMS 
1906 Brushcliff Road 
Pittsburgh, PA 15221 
412/243-7365 


Looking for the right tool for the job? 


GET THE HAMMEK 
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SAME DAY SHIPPING (USUALLY) 
OUTSIDE OKLAHOMA: NO SALES TAX 


8087-3 MATH $105.00 
8087-2 COPROCESSORS 140.00 
DYNAMIC RAM 
256K 256Kx1 120ns $ 4.49 
256K 256Kx1 150ns 3.25 
64K 64Kx1 150 ns .99 
EPROM 
27C256 32kx8 250ns $15.99 
27256 32kx8 250ns 9.10 
27128 £16Kx8 250ns 3.47 
27C64 ~—s 8Kx8 200 ns 7.85 
2764 8kx8 250 ns 2.50 
2732A 4Kx8 250 ns 2.70 
STATIC RAM 
6264LP-158kx8 150ns $4.99 
6116LP-3 2kxs 150 ns 1.95 


OPEN 612 DAYS: > WE CAN SHIP VIA FED-EX ON SAT. 
MasterCard/VISA or UPS CASH COD 

—.aa| Factory New, Prime Parts Poo 

costoN | MICROPROCESSORS UNLIMITED 

DELIVERY 24,000 S. Peoria Ave., (91 8) 267-4961 


BEGGS, OK. 74421 
Prices shown above are for July 2, 1985 


CONSUME NO EXPANSION SLOTS: $78.50 
QUANTITY ONE PRICES SHOWN 


J costs. Shipping & insurance extra. Cash 
can usually be delivered to you by the next 
Standard Air @ $6.00, or Priority One @ $15.00! 
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HISOFT 


HIGH QUALITY CP /M 


SOFTWARE 


HiSoft has been selling Z80 CP/M software in 

Britain and Europe for over 4 years. Now we'd 

like to introduce you to our range of program- 

ming languages: 

HiSoft Devpac: Z80 assembler/editor/ 
debugger 


Kernighan/Ritchie 
implementation 


HiSoft Pascal: fast, standard compiler 
All at $69 inclusive each. 

These programs are also available for other 

7.80 machines including Timex 2068. 


Call or write for full technical details and 
press commentaries, or order from: 


F= WISOFT 


180 High St. North 
Dunstable LU6 1AT 
ENGLAND 
01144 (582) 696421 


HiSoft C: 
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P eeph ol e Op f imiz er (Listing continued, text begins on page 56) 


Listing Five 


char & 

esc (str) 

char &str; 

{ 

Ent MN, Cs 

char %p; 

char &strcpy(); 


if (%str !'= ESCAFE) 
return(++str)3 

else if (&(p=(str+1)) == ENDSTR) /% ESCAPE not special at end. &/ 
return(++str); 


else 
{ i¢f (%p == "N’ iit kp == ’n’) 
{ tstr..=.’\n’'s 
return(strcpy(+tstr, ++p)); 
3 
else if (kp == ’7T’ {i &p == ’t’) 
{ str = "\t’s 
return(strcpy(++str,++p)); 
3 
else if (¥p == ’B’ {i tp == ’b’) 
{ str = *\b’3 
return(strcpy (++str,++p)); 
} 
else if ((&p | 0x20) == ’r’) 
{ Sstr = *\r’s 
return(strcpy(++str,++p)); 
4 
else if (&%p == ’0’ && (&(p4l) | 0x20) == ’x’) /* Hex ¥/ 
{ p += 23 
tstr = Oxtt & xtoi(p); 
returni(strcpy(++str,p += 2)); 
} 
else if (Xp >= ’0’ && tp <= ’7*) /& Octal representation & 
( for (n=0,c=U; (8p >= 70’ &Y Bp <= 77’) B& NK=3; +4n, ++p) 
{ c= (e<<3) «4+ (8p = 70" ye 
} 
str = c: 
return(strcpy(++str.p)); 
3 
else 
{ istr = Xp; 
return(++p); 
} 
} 
} 


/% dodash -- Expand set at srcli] into dest(j), 
stop at delim. %/ 


dodash(delim, srcp, stdest, destp,) 
char %%srcp, &%desto, kstdest, delia; 
{ 

Char &src, %cp, &tmp; 

int k, junk; 


src = cp = Xsrcp;: 
while (%src '= delim && src '= ENDSTR) 
{ if (&src == ESCAFE) 
{ tmp = esc(src); 
addpat(%src, stdest, destp); 
src = tnp-l; 
} 
else if (%src != DASH) 
addpat(%src, stdest,. destp); 
else it ( src == cp ii srcli] == ENDSTR) 


addpat (DASH, stdest, destp); /% literal - &/ 
else if (isalnum(S8(src-1)) && isalnum(srcli)) 
&& &(src-1) <= srcli)) 
{ for(k = 8(src-i) + 13 k <= srclils ++k) 
addpat(k, stdest, destp); 
srct+; 
> 
else 
addpat (DASH, stdest, destp); 
srct++; 
} 
Ssrcp -= ¥srcp - src3 
} 


/* makesub -- Make substitution string from arg in sub. %/ 


char 8 

makesub(arq. delim, sub) 
char tarq, delim, *sub; 

{ 

Char &p, ta, %stsub, ktmp; 


stsub = sub; 
while (Sarg '= delim && %arq '= ENDSTR && Sarg '= ’\n’) 
{ if (Sarg == ’&’) 
{ addpatWITTO, stsub, &sub); 
addpat(’0’, stsub, &sub); 


} 
else if (%aro == ESCAPE && araofi} > ’0O’ && argli) <= ’9’) 
{ addpat (DITTO, stsub, &sub); 
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addpat(arqlij, stsub, &sub); 


++¢arq: 

} 

else 

{ tmp = esc(larg); 
addpat(*arq, stsub, &sub); 
arg = tmp - 1; 

} 

++araq; 


} 
if (Sarg '= delia) 
return(NULL); /% Missing delimiter k/ 
if ¢! addpat(’\0’, stsub, &sub)) 
return (NULL); /* No space for sub string */ 
else 
return(ara); 
} 


/% subst -- Substitute “sub” for occurrences of pattern. %/ 
/& Modified for ootimizer. %/ 


subst(ln. tr) 

int In; 

struct trtmn ttr; 
{ 


struct lkline foo, &nn; 
char &newline(); 
int line, n;3 


lparen = rparen = 0; 

nn 2 tr->new; 

0o = tr-dold; 

for (n = tr->nolds; n > 0: --n) 

{ if ((line = In - n + 1) ¢ 0) 
line += maxlines; 

if (nm <= tr->nold - tr->nnew) ¢€ 

delln(line); /% Not enough replacements. %/ 
oo = oao->nextin; 


/% Buffer wrap around. %/ 


else { 
if ('subline(line, o0->1n,. nn->In)) 
return(FALSE); 
else 
{ 00 = a0->nextin: 
nn = nn->nextin; 
} 
} 
) 
for (n = tr->nnew; nm > tr->nold; --n) ¢ 
newline("\n"); 
if (!subline(curln, BOLSTR, nn->I1n)) 
return (FALSE); 


/t More lines to add. %/ 


else 
nn = nn-dnextin; 
} 
return(TRUE); 
} 


/% subline -- Do substitution on one line. %/ 
subline(line, pat. sub) 

int line; 

char &pat, %sub; 

{ 

char newlMAXSTR}; 

char %p1, tp2, &p3, Ylast. %pp; 

int subbed; 

Char Samatch(). 8strcpy(), kmalloc(); 


p2 = new; 

subbed = FALSE; 

last = NULL; 

pi = lineplline);: 
while (%p1 '= ENDSTR) 


{ if ('subbed). 
{ pp = oat; 
pS = amatch(lineplline), pi, &pp); 
} 
else 


p3 = NULL; 
if (p3 != NULL && last '= p3) 


{ subbed = TRUE; /& replace matched text %&/ 
catsub( pl, p3, sub, new, &p2); 
last = p3; 

} 

if (pS == NULL {i p3 == pi) 

{ addpat(%p1, new, &p2); 
++p1; 

} 

else /% Skip matched text. %&/ 
pil = p33; 

} 

if (subbed) 

{ if (!addpat(ENDSTR, new, &p2)) 
¢ return(FALSE); 


(Continued on page 82) 
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BRIEF 


“BRIEF Is The Best Editor I Have Ever 
Used. I Switched. I Use BRIEF Regularly.” 


Choosing the right program editor is an extremely 
important decision. After all, more time is spent with 
your program editor than with any other category of 
software. A good program editor helps to stimulate 
creativity and produce programs of superior design. 
A poor program editor, on the other hand, can be 
worse than none at all. It can slow you down, get in 
your way, and make even the simplest tasks difficult. 


BRIEF - PROGRAM EDITING YOUR WAY 


Every programmer has an individual style that 
makes their work unique. Most program editors com- 
promise that style by forcing the programmer to con- 
form to their methods. Not so with BRIEF. 


BRIEF’s most powerful feature is its ability to 
conform to your way of programming. BRIEF can be 
easily tailored/customized to your individual 
preferences. For example, keyboard reassignment 
allows the keyboard to be used in whatever way you 
prefer. Keystroke macros allow long sequences of 
editor directives to be repeated by pressing a single 
key. Plus you can simultaneously work with 
numerous program and data files, and configure 
many windows to control BRIEF’s visual presentation. 


75% OF THE EXPERTS WHO 
HAVE TRIED BRIEF SWITCHED! 


(Call For Details) 


Steve McMahon* 


“A BONA FIDE UNDO”’ Steve McMahon - BYTE 
REVIEW “BUILD YOUR DREAM EDITOR” MARCH 1985 


Here are Steve McMahon's exact words: “...BRIEF 
implements a true undo facility, by default allowing 
command-by-command recovery from the last 30 
commands...The number of commands you want to 
be able to undo can be changed.” (up to 300) ‘“‘Only 
with BRIEF, though, was it possible to undo a macro 
that produced 4000 words of text with a single 
keystroke.” 


EVERY FEATURE YOU WANT 
BRIEF supports practically every feature you've ever 
seen, and some you probably haven't thought of yet. 


e Repeat Keystroke 
Sequences 


Edit Multiple Large 
Files 


e Windows (Tiled & e 15 Minute Learning 
Pop-up) ¢ Reconfigurable 

e Unlimited File Size Keyboard 

e Full UNDO (N Times) ¢ Online Help 


True Automatic Indent e Search for ‘Regular 


for C Expressions’ 
e Exit to DOS Inside ¢ Mnemonic Key 
BRIEF Assignments 
* Compile programs ¢ Horizontal Scrolling 
inside BRIEF ¢ Comprehensive Error 
e Uses All Available Recovery 
Memory e And ... a Complete, 
e Intuitive Commands Compiled, Programmable 
© Tutorial and Readable 


Macro Language. 





handle = @; 


main (argc, argvll 


lint 


| A TYPICAL BRIEF SCREEN 


Notice there are three windows on the 





lint ye ‘ ere screen simultaneously and each one is 
eS Sa. efile, ; i ‘ : a, 
Pee eae (s Kefile.h sroulramn fs viibia the Uppeinmee Mise: 
st makefile.h: 
typedef struct “+ 
{ 3 | ae This is the definitions fil the mesic gin has run a eet checking 
| short action, ** Hopefully, it won’t be unreasonab} ™acro which found a mismatched open 
state; | #* that have been written. parenthesis in the arguments to the 
Je FSA MAIN po mainline. The other two windows show 
Fsa fsall([8] = {/* Alphanus Co perecet struct cmd_struct header files containing information crucial to 
ry State oY ae oh. see he eee ai anliaited: miner ot wigdoeey eheatieg: 
* State Ll. 4, 
7% State 2. #/ o, a. 1 struct cad_struct *next_cmd; , 
7 State : ” s 5 il 1: ee Bee Cod: accessed simultaneously. 
% State 4. *¥ a Re , 
Mismatched open parenthesis. Line: 11 Col: 17 2:17 pam 





BRIEF’S ONLY LIMITATIONS ARE THE ONES YOU SET 
Full refund if not satisfied in 30 days. ONLY *195 


FREE with order: “Best of BRIEF Macros” — Contest 
entries include macros for Fortran, C, Calculator, Base 


Converter, etc. Call before November 30. 


AVAILABILITY: IBM-PC and Compatibles, 
AT, & TANDY 2000 


Solution 
ystems * 









335-D Washington St., Norwell, MA 02061 (617) 659-1571 


“Steve McMahon's quote courtesy Suntype Publishing Systems. BYTE review by Mr. McMahon may be found in BYTE Magazine March 1985. 
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P. ee phol e Op timiz er (Listing continued, text begins on page 56) 


Listing Five 


else { /* Copy new line into linep array. %/ 
free(linepllinel); 
if ((linepflline) = malloc(strlen(new)+1)) == NULL) 
error ("not enough memory"); 
strcpy(linepllinel, new); 
} 
) 
return(subbed); 


/*% catsub -- Add replacement text to end of new. %&/ 


catsub(p!, 92, sub, new, pp3) 
char tpl, 8p2, %sub, knew, %&pp3; 
{ 

char Sp, %q, ¥*esc();3 


for ({p = sub; &p '= ENDSTR: ++p) 
< if (8p == DITTO) 
€ 
if (plIT > *0* "&k-ptt}-<279") 
( pl = qstart(plij-’07); 
p2 = qend(p(1)-’0’'); 
} 
tor (q = pl3 q < p23 ++q) 


C addpat(%q, new, pp3)3 
) 
+493 

} 

else 

{ addpat(%p, new, pp3)3 


/% delln -- Delete a line. %/ 


dellniin) 





int ln; 

{ 
free(lineplln]); 
linep€ln] = NULL? 


) End Listing Five 


Listing Six 


SHLD\t\ ({\.a-zA-Z_J]{£\._a-zA-Z0-9+\-J4\) 
“\tLHLDAt\! 


x 

SHLD\t\i\t: redundant LHLD deleted 

7 & 

\tMOV\tA,H 

“\tORA\EL 

\tUNZ\t\CL\._a-2zA-ZI0L\. _a-zA-Z0-9]8\) 

A\tLXI\tH,U 

4 

\tMHOV\tA,H 

\tORA\tL 

\tUNZ\t\i\t; LXI H,O removed following in line test 
Zi 

\tCALL\t\(fcend\. \) 
\tCUNZ\C\(L\._a-zA-ZIJ(\._a-zA-20-9)8\) 

“\CLXI\tH,0 

x 

\tCALL\t\i 

\tUNZ\tC\2\t; LXI H,O removed following library test 
LZ 

\tCALL\t\(Lcoen)\.\) 

\tJZA\t\(0\. a-zA-ZIC\._a-zA-Z0-9)3\) 

“\tEXIANtH 0 

4h 

\tCALL\t\1 

\tJZ\t\2\t: LX1 H.O replaced tollowinag library test 
\tDCX\tH 


TAKE THE PAIN OUT OF BACKUP 






Famous Excuses For 
Not Doing Backups 






Backing up a Winchester onto multiple 
floppies takes forever. 





PIP makes you remember what you 
changed — too much trouble. 






Disk failures only happen to the other guy. 
















Floppy-To-Floppy 
Incremental Backup 
For Only $40. 


Like PIP but copies just 
the files that have changed. 


Order Qbaxl1. 







Amanuensis, Inc. CP/M® Digital Research. 





For CP/M 2.2 on 8” SSSD and popular 5%” formats. Shipping $2 US. and Canada, $4 overseas. Qbax TM 


Oe To ae el 





The Remedy: Copy 
Just What’s New — 
Automatically! 


Qbax2 will: 

Split files bigger than one floppy. 

Track all the pieces. 

Tell you which floppy it needs and when. 
Give you a built-in catalogue. 

Reclaim wasted floppy space. 


Qbax2 only $95 from: 


e Amanuensis, Inc. 
R.D.1, Box 236 
A Grindstone, PA 15442 
(412) 785-2806 
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wb 


4% roth 

\tCALL\t\ (Ecen)\. \) Listing Seven 
\tJZ\t\ (€\. a-zA-ZIC\._a-zA-20-98\) 

\ELXI\tH, 18 


% 
\tCALL\t\1 
\CtUZ\t\2\t; LXI H,1 replaced following library test , ot 
%% /%t Library routines used by optimizer. %/ 
“\CJZ\C\ (LN. a-zA-ZII\._a-zA-Z0-918\) 
A\tUMPAR\(L\. _a-zA-Z](\._a-zA-Z0-9)8\) atoi (str) /%t Convert str to integer. %/ 
“NENGFACS BAD char %&str;: 
% exit() /% Return to CP/M %/ 
\tUNZ\t\2\t3 JZ around juap removed fclose(fd) /* Close file with descriptor fd. %/ 
\IN\3 FILE €d5 
“iL char &fagets(str, nbytes, fd) /& Read one line (maximum of nbytes) %/ 
A\tUNZ\t\(L\._a-zA-Z)E\._a-zA-Z0-918\) char sstri /% from file into str. %/ 
A\CUMPAt\(£\. a-zA-Z](\._a-zA-Z0-9]8\) eneuei 
“VUNG NE, 84) ; 
% FILE fopen(name, mode) /% Open tile name with mode="r" or "w", &/ 
\tUZ\t\2\t; JNZ around jump removed char name, tmode; 
\I\3 fprintf(fda, tormat l, aro]... ) /%& Formatted output routine. %/ 
“4 FILE fd: 
FPUSH\tH cnar Stormat: 
A\KLXINtH.AVCL\. a-zA-Z)(\._a-zA-20-9]4\) fputs(str,. td) /% Output str to file fd. k/ 
“\tPOP\tD oA ae 

free(block) /% Release block of memory allocated by 
% char *tblock; /% malloc. %/ 
XCHG\t;PUSH H POP D around LXI H changed to XCHG isalnumic) /% Returns non-zero (true) if cis a &/ 
\ELXEVEH, NE char c; /* letter or digit. &/ 
hh char kmalloc(nbytes) /% Return pointer to block of nbytes &%/ 
=? int nbytes:; /k of available memory. 3/ 

\ELHLDAt\(C\._a-zA-ZI£\._a-zA-Z0-918\) putc(c, ta) /% Output character c to file fd. %&/ 

A~\tPOP\tD char c; 
4 FILE td: 
XCHG\t;PUSH H POP D around LHLD changed to XCHG char tsbrk(nbytes) /t Return pointer to nbytes of memory. %/ 
ar int nbytes; /*% Cannot be freed. &/ 

char &strchr(str, c) /t Ret i to fi 
STA\t\(E\.a-zA-Z_JL\. _a-zA-Z0-9+\-J4\) Rae See Eee aie epee ering OEE ee eee a ee 
Pee ns strcmp(stri, str2) /% Compare strings 1 and 2. Return 0 if &/ 
STA\t\1\t; redundant LDA deleted Shia, Pest Ae Seek ee . a he hee La are ae ae 
ative char %&strcpy(dest,. source) /% Copy string at source to dest. %/ 
A\(A ~ ~ char &dest, ¥source; 
a Meier eee strlen(str) /k Return lenath of str. &/ 
\tuMP\t char &str; 
:- uhreaénable code: \1 strncmp(stri. str2, n) /t Compare first n characters of stri and %/ 
LY : char *stri, tstr2:; /* str2. Return © if identical, negative %/ 
\tRETS int n; /% if stri<str2 or positive if stri>dstr2. %/ 
A\t xto1(str) /* Return inteyer value of hexadecimal 4#/ 
% char %str: /% representation in str. %/ 
\tkeT 
\ts unreachable code: 
“2 
\tUMPAR\CE\. a-zA-ZI(\._a-zA-Z0-9)8\) = 40 
AVING EAE. BV) End Listings 
4 
\tDS\tO\t; jump to next location removed 
VAIN2 
hm End Listing Six 





THIS -RB-o8S 
ACTUAL PRINTED SIZE 


Finally. 
BSW-Make. 


Tree a 


MAKE YOUR MOUNTAINS INTO MOLEHILLS: 
MINI-PRINT your PC-DOS Files 














The Boston Software Works now brings a A Graphi t % full ages on ach een 
7 : | raphic “Vin i sheet of pays 

complete implementation of the Unix Visual Shell f printer paper, ¢ this: ste 

“make” facility to MS-DOS. No more recom- asp apaireabor’s Qver 38.000 chars/page 

piling every file in sight after a small edit; no Unix/Xenix e os 

more wondering if you’ve really rebuilt every End-Users and datS can’ be har ahaa Shs we 

module affected by an edit. Just type “make” sis dal Improves: 

and BSW-Make automatically builds your Experts Alike! “s = patie "storage 


product quickly, efficiently and correctly. 
BSW-Make supports: 


e (ists 
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Small-C 
Update 


by J. E. Hendrix 


What’s the author of Small-C V2 been 
up to lately? Improvements, bug fixes, 
and a macro assembler. 
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on the Small-C compiler, and many readers may be 

wondering about further developments. I have received 
a number of queries, mostly about structures and addi- 
tional data types, but for several reasons I have not devel- 
oped Small-C further. 

For one thing, additions would affect nearly every part 
of the compiler, so it makes sense to clean up the overall 
structure of the compiler before proceeding. Rather than 
bloating the compiler with code, I would like to stream- 
line its design, reduce its size, and improve its efficiency 
before adding more features. Then there is the need to 
free Small-C from dependence on other packages for as- 
sembling and linking its output. I consider this capability 
more important than additional compiler features. All of 
this amounts to a considerable project, and I just haven’t 
had the time recently to spend on it. 

I also wonder whether Small-C really needs to become a 
full C compiler to be a useful tool. It is already suitable for 
many applications; text processing and system utilities are 
obvious examples. With plenty of full-featured C compil- 
ers available at reasonable prices, I haven’t felt a great 
urge to take Small-C beyond its present entry-level stature. 

I have sent the compiler to individuals and companies 
involved in auto-ignition control; manufacturing of CRT 
terminals, electronic games, microcomputers, and circuit 
cards; mental health; publishing; materials management; 
telecommunications; engineering research; control of de- 
vices like transmitters and telescopes; and education. I 
have noticed an increasing interest in Small-C in education 
circles—high school, vocational-technical, and college. Be- 
cause it is small, is written in a popular high-level lan- 
guage, and generates readable assembly language code, 
Small-C is ideal for studying what compilers do and how 
they work. Its one-pass algorithm and the fact that input 
and output default to the console make it especially conve- 
nient for studying the relationship between compiler input 
and output. The Small-C compiler is also a great guinea 
pig for term projects, giving hands-on experience in com- 
piler construction to would-be computer scientists. And 
The Small-C Handbook makes it easy for users to quickly 
familiarize themselves with the language and the compiler. 

I maintain a mailing list of Small-C users whom I try to 
keep informed of bug fixes and improvements. But be- 
cause Small-C may be distributed freely (on a noncom- 
mercial basis), many people have copies that they ob- 
tained indirectly and that may be out of date. If you have 
version 2.1 with the new library that was introduced in 
May and June 1984 (DDJ No. 91 and No. 92), then the 
fixes reported below will bring you up to date. 

I am still distributing Small-C for $25, The Small-C 
Handbook for $17.95, and a package of Small-C software 
tools for $35. Naturally, complete source code is included. 
To order, send a check or money order to me at the ad- 
dress listed at the end of the article. Include $4 for post- 


t has been about a year since the last Dr. Dobb’s article 


J. E. Hendrix, Box 8378, University, MS 38677. 
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age and packaging plus $6 for overseas air mail. Send a 
self-addressed, stamped envelope for information. 

People frequently ask for diskette formats other than 8- 
inch SSSD and North Star 5%4-inch, making it necessary 
for me to refer them elsewhere, and many people to whom 
I have sent Small-C and the tools have machines with dif- 
ferent diskette formats, CPUs, and operating systems. In 
most cases, however, I do not know where they stand in 
porting the software or how willing they are to take refer- 
rals. So if you are running Small-C 2.1 (with the new li- 
brary) on anything except an 8-inch or North Star CP/M 
machine and are willing to help distribute it, please let me 
know. Indicate (1) your machine, (2) your operating sys- 
tem, (3) the diskette formats you can supply, and (4) 
whether or not you have the Small-Tools package. 


Redundant Code 
David Bookbinder has observed that Small-C generates 
redundant code for deallocating local variables at the end 
of a function when the last statement is a return. The 
same is true if a return is the last statement in any com- 
pound statement that declares local variables. This is 
harmless, but it unnecessarily adds to the size of programs 
and it really is untidy. 

Likewise, if the last statement in a function is a goto, 


Sidekick for CP/M! 


Poor Person Software brings you 


Write-Hand Man 


Desk Accessories for CP/M 


Suspend CP/M applications such as WordStar, dBase, and 
SuperCalc, with a single keystroke and look up phone 
numbers, edit a notepad, make appointments, view files and 
directories, communicate with other computers. Return to 
undisturbed application! All made possible by Write-Hand- 
Man. Ready to run after a simple terminal configuration! No 
installation. 


Don’t be put down by 16 bit computer owners. Now any 
CP/M 2.2 machine can have the power of Sidekick. 


Bonus! User extendable! Add your own applications to Write- 
Hand-Man. All you need is M80 or RMAC. 


$49.95 plus tax (California residents), shipping included! 


Volume discounts. 


Available on IBM 8 inch and Northstar 5 inch disks. Other 5 
inch formats available with a $5.00 handling charge. CP/M 2.2 
required. 


COD or checks ok, no credit cards or invoices 
Poor Person Software 
3721 Starr King Circle 
Palo Alto, CA 94306 
tel 415-493-3735 
Write-Hand-Man trademark of Poor Person Software, CP/M and RMAC trademarks of Digital 


Research, Sidekick trademark of Borland International, dBase trademark of Ashton-Tate, WordStar 
trademark of Micropro, SuperCalc a trademark of Sorcim, M80 trademark of Microsoft. 
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unnecessary code for deallocating local variables and a 
RET is generated: because a goto would block the exit 
path from a function, there is no need for such code. (The 
compiler already eliminates the RET if the last statement 
is a return.) There is no problem with goto’s terminating 
nested compound statements because goto’s are not al- 
lowed if variables are declared anywhere after the open- 
ing brace of the function body—so there are no variables 
to deallocate. 
The following patch eliminates this redundant code: 


(1) Add the following line to the end of the file CC.DEF: 
#define STLABEL 14 


(2) Change the line in newfunc(_) (file CC12.C) that con- 
tains a call to statement( ) to read: 


statement( ); 


#ifdef STGOTO 
if(lastst != STRETURN & & lastst != STGOTO) 
ffret( ); 
#else 
if(lastst != STRETURN) ffret( ); 
#Hendif 


WIZaRO C 


‘written by someone who has been in the business 


while. This especially shows in the documentation.” 


Computer Language 
February, 1985 


Ail UNIX System V language features 
Support for 8087, 80186 and 80286 
Full library source code included 
Cross-file checks (full UNIX lint) 

Uses MS-LINK or PLINK 86 
ROMable data options 

In-line assembly languaze 

Cross compilers available 


Third party software available, including PANEL 


The new standard for C Compilers on MSDOS! 


Only $450. 
(617) 641-2379 


11 Willow Court 
Arlington, MA 02174 


Wiaiaae 


Systems Software, Inc. 


as U 
VISA 
foe ana} 
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(3) Change the line in statement( ) (file CC13.C) that 
contains a call to dolabel( ) to read: 


else if(dolabel( )) lastst=STLABEL; 


(4) Change the line in compound( ) (file CC13.C) that 
contains a call to modstk( ) to read: 


#ifdef STGOTO 

if(lastst!= STRETURN & & lastst != STGOTO) 
Helse 

if(lastst != STRETURN) 
#Hendif 

modstk(savcsp, NO); /* delete local variable 
space * / 
csp = Savcsp; 


(5) Recompile, assemble, and link the compiler. 


FPUTC Placement 

A problem has been reported concerning the placement of 
the module FPUTC in the relocatable library CLIB.REL. 
Its placement between FPUTS and FREAD makes it pre- 
cede PUTCHAR, which makes reference to it. Because 
L80 can’t load a module that it has already passed, pro- 
grams (like “words” on page 31 of The Small-C Hand- 


EC Text Editor 


by other editors. 


Here’s how you can use the DOS Interface: 
1) Execute any DOS command you like. 


2) Keep a history of all DOS output (you can even have EC automatically save it to a file if you want to keep a 
DOS Log.) EC displays the output in the DOS Interface. You can page through it, scroll it, etc. 
3) You can re-execute or edit previous commands, even those very far back in the DOS history. 


4) You can set a prompt, just like you would for DOS. 


Here’s how this can help you: You can run a database manager or a compiler inside the editor. Enter the com- 
mand to execute your program just like you would in DOS. If you get error messages, exit the application, open a 


book) that reference putchar( ) but not fputc( ) will not 
link properly. The correction for this condition is to move 
FPUTC down in CLIB.REL so that it falls between FOPEN 
and FREE. This is done by invoking LIB80 as follows: 


A>LIB80 

*NEWLIB= 
TCLIB=."..-FPULS= 
*CLIB<FREAD . . FOPEN> 


*CLIB=FPUTC> 
*CLIB= FREE: > 


You should also change the placement of FPUTC in the 
file NEWLIB3.SUB so it will order the modules correctly 
if you ever build a new library from scratch. As a precau- 
tion, you should have LIB80 list the contents of the new 
library (see notes below) then verify that the order exactly 
matches NEWLIB3.SUB. Finally, delete CLIB.REL and 
rename NEWLIB.REL to CLIB.REL. 


fflush( ) and Auxiliary Buffers 

The function fflush( ) attempts to flush an auxiliary buff- 
er even if the file were opened for reading only. In this 
case, the auxiliary flush routine returns an error condition 
when a normal return without taking any action would 


... the Latest in Programming Environment Technology... 
The DOS Interface — All Available Memory — Windows !!! 


EC’s DOS Interface is a major advance. It is far more sophisticated and useful than the “EXIT’’ to DOS provided 


Other Products 


The DeSmet C Com- 
piler — the fastest profes- 
sional C compiler for the PC! 
DeSmet’s program speed & 
efficiency are excellent. We 
chose DeSmet to develop 
EC and Basic__C, though, 
because of one factor: com- 


window on the error messages, and view the error messages as you edit your text. 
Jump instantly to the lines with errors. Correct all of the syntax errors after one compile; it’s faster and more conve- 
nient than getting thrown back in your text time and time again as the compiler finds each error. 


The DOS Interface captures ALL DOS output — even from your application. When your program terminates, and 
you want to edit your source code, you can still view your program’s previous output! Especially useful as a debug- 
ging trace. 


Read in large files — limited by your PC’s memory. Move text between windows and buffers. 
There’s more: List command — like a random access Find, wildcards for Find/Replace/List, tab size dependent on file extension, auto-indent for 
C, on-screen file-comparison, Path support, support for read-only files, extensive screen and printer support, International and other extended 
ASCIl characters, support for International keyboards, garbage pile of deleted text, columnar editing. Keystroke macros are created merely by hit- 
ting the keys — no codes to remember. 


On-line tables: ASCII, extended ASCII, extended keyboard codes, operator precedence for C, DOS and BIOS 
functions, PC Memory Map. On-line Help and a Tutorial. EC was written with the DeSmet C compiler on a PC. 


Please note: EC’s low price belies its quality. EC stands with the best! The price is low because we want everyone 
to try EC and find out why it is superior to editors costing $200 and more! 


EC is not copy-protected. 30 day money back guarantee. Full-featured demo: $5.00. 


EC and BASIC__C run on PC compatibles. 
We use and support all products we sell. 
C Source 
12801 Frost Road 
Kansas City, MO 64138 
(816) 353-8808 
Shipping: $5.00 for orders under $50.00. MC, VISA, COD. Site licenses available. OEM’s, dealers welcome. 
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pile and link time. DESMET 
IS FOUR TIMES FASTER 
THAN LATTICE. ’Nuff said. 


The Basic__C Library 
— the Convenience and 
Rich Function Set of BASIC 
for C. 

The best way to move BASIC 
code over to C. The manual 
is regarded as the best 
tutorial for programmers 
moving from BASIC to C. 
You get a version for Lattice, 
DeSmet, and Cl. No 
royalties. Includes source. 


PC-Lint — A top quality lint 
checker at a quarter the price 
of the competition. Save 
hours of debugging by cat- 
ching subtle bugs like func- 
tion return mismatches. 
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have been appropriate. Before auxiliary buffering was 
added, it was not necessary to check the open mode be- 
cause the “dirty buffer” status was being checked and it 
could not have been set for read-only files. This fix veri- 
fies the open mode before any attempt to flush a buffer. 
An attempt to flush a closed file now gives a normal re- 
turn. Modify flush( ) as shown below, compile, assemble, 
and replace in CLIB.REL: 


FFLUSH.C 


fhlush(fd) int fd; { 
if(Umode(fd) & WRTBIT) { 
if((Uauxsz & & Uauxsz[fd] & & Uauxfi(fd)) 1: 
(lisatty(fd) & & Udirty[fd] && 
Usector(fd, WRTRND))) { 
Useterr(fd); 
return (ERR); 


return (NULL); 


Reset Auxiliary Buffer Pointers 
When an fd that has an auxiliary buffer (because of a 
previous call to auxbuf( )) is closed and reopened, the 
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next-byte and end-of-data auxiliary buffer pointers are 
not reset. This causes improper reading and writing. You 
must revise two library modules to correct this problem: 
CSYSLIB and AUXBUF. These modules should be revised 
as indicated below, compiled, assembled, and replaced in 
CLIB.REL: 


CSYSEIBL. 
int 
*Uauxsz, /* addr of Uxsize[ ] in AUXBUF */ 
Uauxin, /* addr of Uxinit( ) in AUXBUF */ 
Uauxrd, /* addr of Uxread( ) in AUXBUF */ 
Uauxwt, /* addr of Uxwrite( ) in AUXBUF */ 
Uauxfl, /* addr of Uxflush( ) in AUXBUF */ 


Uopen(fn, mode, fd) char *fn, *mode; int fd; { 
char *fcb; 
if('strchr(“‘rwa’’, *mode)) return (ERR); 
Unextc[ fd] = EOF; 
if(Uauxin) Uauxin(fd); 
if(stremp(fn, ““CON:”)= =0) { 
Udevice[ fd]=CPMCON; Ustatus| fd] = 
RDBIT: WRTBIT; return (fd); 


Conix 


NOW ONLY $79.95! 


If you think you're missing out on innovative software 
developments because nobody is writing for CP/M'™-80, take 
a look at us. We've adapted UNIX™ features to CP/M like 
never before. and with the kind of professional, quality- 
controlled product that you deserve. That product is none 
other than the critically acclaimed ConlX Operating System. 


ConlX can provide any 48K+ CP/M-80 or compatible system 
with I/O Redirection and Pipes (uses a or disk), 
perfected User Areas, Command and Overlay Path Searching. 
Auto Screen Paging. 8Mb Print Buffering, 22 new SysCalls, 
Function Keys, ‘Virtual’’ disk system, Archiver (saves over 
50% disk), extensive command Ranaa Be: 300+ variables, 100+ 
commands, pull-down menu, and much more! Uses as little as 
1/2K RAM! Runs with CP/M for true data and software 
compatibility. Installs easily without any system mods! 


The ConlX package lists at $165 and has been advertised and 
sold internationally to many enthusiastic customers since 
October 1983. As a special limited offer, we've lowered the 

rice of the complete ConIX system by 50% to. ae $79.95! 
Bon't miss this opportunity to bring your 8-bit micro back into 
the software revolution. Order your copy of ConlX today! 















Price includes manual, 8°’ disk, and user support. 514°" conversions 
available. Contact your local dealer. or buy direct and add shipping: 
$4.50 UPS, $10 Canada. $25 overseas. NY residents add sales tax. 

x 680 Parkchester Station, NY 10462 


Cf Tel. (212) 652-1786 (for information/orders) 


‘We're helping your computer work better for you!’ 
UNIX: AT&T Bell Labs, CP/M: Digital Research, ConIX: Computer Helper Ind. 


omit Helper Industries Inc. 
P.O. Bo 
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AUXBUE.C Lexcmp( ) 
Lexcmp( ) erroneously returns zero, indicating a match, 


extern int *Uauxsz, Uauxin, Uauxrd, Uauxwt, when the first bytes that are not identical are upper and 
Uauxfl, Ustatus[ ]; lower cases of the same letter; for instance, ““Happy” and 
ae ‘““HAY” appear to match. Revise lexcmp( ) as indicated 
auxbuf(fd, size) int fd; char *size; { /* fake below, recompile, assemble, and replace in CLIB.REL: 
unsigned * / 
if((Umode(fd) ti !size ti avail (NO) < LEXCMP.C 
size 11 Uxsize[fd]) ae 
return (ERR); lexcmp(s, t) char *s, *t; { 
Uxaddr[fd] = malloc(size); Uxinit(fd); while(lexorder(*s, *t) == 0) 
Uauxin = Uxinit; ea tay ae 
/* tell Uopen( ) where Uxinit( ) is */ else return (0); 
Uauxrd = Uxread; return (lexorder(*s, *t)); 
/* tell Uread( ) where Uxread( ) is */ \ 
Uauxwt = Uxwrite; ae 
/* tell Uwrite( ) where Uxwrite( ) is */ char Ulex[128] = { 
Uauxsz = Uxsize; Po rs NA a ee 
/* tell both where Uxsize[ ] is */ OP Ek oe a ces cigs 
Uauxfl = Uxflush Soe Ti Te 1S ASSES SOA: 
/* tell flush( ) where Uxflush( ) is */ £81920, 21 22;-23,-24, 25, 26; 
Uxsize[fd] = size; FT De 2 SO 52235, a4) 
/* tell Uread( ) that fd has aux buf */ 36,.37,-38, 39, 40, 41, 42, 43, 44, 
return (NULL); 45, 46, 47, 
/* 65:66: 67,68: 6% 70, 71, 72,73, 
** Tnitialize aux buffer controls 74, 
-y ! [see BS eh et Se AD 4K / 
Uxinit(fd) int fd; { AS ?49.'50, 55 52, 35..54, 
Uxnext[fd] = Uxend[fd] = Uxaddr[fd]; pert NAT, Se 
Uxeof[fd] = NO; | 75, 76, 77, 78, 79, 80, 81, 82, 83, 
} 84, 85, 86, 87, 88, 89, 90, 91, 92, 


93,94; 9396-97; 98-99, 100, 
[EERE RATES RRES 
35°96, 7 OO Oe OU. 


Optimizing Tests Against Zero Jo ey 
Small-C optimizes tests against the value zero. However, Td. 16571, 78.19; 80 Si; 82; 83, 
in its enthusiasm, it overlooks certain unary operators that 84, 85, 86, 87, 88, 89, 90, 91, 92, 
might spoil its efforts. So it optimizes if(((i= =0))...; as 93, 94, 95, 96, 97, 98, 99, 100, 
though it were if(i= =0)...;. You can fix this by making PRC ee Fed 
the changes indicated below to file CC32.C of the compiler: 61, 62, 63, 64, 

CC32.C 101 


\; 


hier! 3(Ival) int lval[_ ]; { 


else if (match(“‘~’’)) { pee This patch also makes a minor change for improved effi- 
ae ciency and removes leading zeroes from the values in 
return (lval[7]=0): Ulex[ ] so they will not look like octal values to full C 
compilers. 
else if (match(“!’’)) { Ry 
Sig Macro Storage 
return (Ival[7]=0); Experience has shown that the amount of storage space 
allocated for macro replacement strings is probably too 
else if (match(“ — ”’)) { fr sina: Sy small for the number of macros allowed. Also, the num- 
gi ber of macros allowed may not be large enough for some 
return (lval[7]=0); programs. 
\ The following parameters in CC.DEF have been in- 


creased to help this situation: 
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NATIONAL PUBLIC DOMAIN 


Why reinvent the wheel? 

Public Domain Software isn’t copyrighted, 
SO no need to pay license fees for thou- 
sands of routines; business-utilities-dbase. 
Complete, latest issue user group disks 
available to rent 'n copy at your leisure. 
Send $5.00 for a postpaid directory disk or 
a SASE to National Public Domain Soft- 
ware, 1533 Avohill Dr, Vista, CA 92083 or 
(619) 727-1015. 


FED “Binary File Editor’’ 

Allows the user direct access in both HEX 
and ASCIl format to any disk file on the IBM 
PC. FED can patch object modules, exam- 
ine word processing files, repair damaged 
files and verify the results of I/O operations. 
S/S DOS disk for 128 IBM PC. Only $49 ‘+ 
$5 s/h”. 

The Whitewater Group 

2912 N. Burling Avenue 

Chicago, IL 60657 

(312) 975-6095 


Quality Software 

at Giveaway Prices! 

We have to clear lots of CP/M & 
MSDOS software. Many 75% off list 
price. Source for many. Thousands of 
5-inch & 8-inch diskettes—under $1 
ea. “Everyman's Database Primer” / 
“dBase Il for Every Business” —$7.50 
ea. + $2 S/H. 

Software Salvage 

Box 640 

Norwalk, CT 06856 


DBase II User—Converting to “’C’’ 
Try the dBx translation system— from 
DBase II to quality “C”; incl. translator, 
screen handler, & sort (w/source)— 
uses any file handler. For MSDOS, 
XENIX & UNIX Sys 5. 

Desktop Al 

Box 640 

Norwalk, CT 06856 


‘COMPU’ BLOKS” 

4510 Holiday Blvd. 

Salt Lake City, Utah 84117 

(801) 272-2391 

Compu’ Bloks are a space odyssey for 
child or adult. Rectangles, Octagons, 
Squares and Circles create countless 
extensions in all directions. Space Sta- 
tions, Lasars and Probes in an ordered 
sequence of infinite numbers . Comets, 
Meteors and Constellations. $.75 
brings catalog. Rwon Lucasor 


$50 FORM & SCREEN PAINTER 
FOR dBASE, BASIC & TURBO 
100,000 copies shipped with dBASE Il, 
now on PC & MSDOS. “Paint” 
prompts, data fields, lines, boxes where 
you want them and ZIP® writes dBASE 
l/l, BASIC or Turbo Pascal code. Then 
add one line to your programs for pro- 
fessional data entry and reports. $50 
cash, check, or VISA, no COD. 
MAGNUM DATA INC. 

627 South Plymouth Blvd. 

Los Angeles, CA 90005 

(213) 937-0808 


ECLIPSE SYSTEMS 


AZTEC C65 + ProDOS 

Use Aztec C DOS 3.3 software under Pro- 
DOS. Run programs without relinking. Sys- 
tem includes recursive Shell, support for 
pseudo-code, vi like editor with macros, li- 
brary upgrade and source code. Requires 
ProDOS user's disk. $49.95. 

Eclipse Systems, 223 Matthew Rd., Marion, 
PA 19066. (215) 667-8354 


W.B. SOFTWARE DEVELOPMENT 


BROWSE for CP/M-68K 

for looking at any CP/M-68K file 
scroll up, down, left, right 

powerful FIND (search) command 
online HELP, PFKEYS, TABS, PRINT 
100% 68000 assembler—ASCIl, HEX 
ANSI 3.64 & other terminal types 
$49.95 US. Visa, M/C, money order. 
WB Software Development, 
112-Oakhampton PI. SW, 

Calgary, AB, 

Canada T2V 4B2 (403) 238-3216 


PRODUCE ASSEMBLY CODE FAST! 
Basic XPL is a high-level assembler 
with source code portability between 
CP/M and PCDOS. Complete with de- 
tailed 65-page manual. Satisfaction 
guaranteed. Send $79 check to author: 
Gary D. Campbell 

205 Sunbird Cliffs Lane 

Colorado Springs, CO 80907 


MICRO COMPUTING SERVICES 


CBTREE FOR C PROGRAMMERS 
Provides enhanced file handling calls di- 
rectly into C programs. Maintains balanced 
B-trees, supports unlimited number of keys 
and key lengths. Fast, Flexible, Efficient. No 
royalties. Source Code Incl. $179. MICRO 
COMPUTING SERVICES 2009 Hileman 
Road Falls Church, VA 22043 (703) 893- 
0118 
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130 
(MACNBR#*7) 


#define 
#define 


MACNBR 
MACQSIZE 


You will need to recompile the compiler to effect this 
change. However, if you are not having problems with 
overflowing macro storage space, you may ignore this 
change. 


fread( ) and fwrite( ) 

The functions fread( ) and fwrite( ) do not return proper 
values. They each take a pair of arguments indicating 
how many items to transfer and the size (in bytes) of an 
item. They are supposed to return the number of “items” 
actually transferred, but instead they are returning the 
number of “‘bytes”’ transferred. 

This edit fixes these problems and makes some changes 
for improved efficiency in write( ). Fortunately, these 
changes are easily made without recompiling the compil- 
er. Look for these functions in the files FREAD.C and 


FWRITE.C. Using AR.COM, extract these files from. 


CLIB.ARC and change them as indicated below: 
FREAD.C 


fread(buf, sz, n, fd) char *buf; int sz, n, fd; { 
return (read(fd, buf, n*sz)/sz); 


EWRIELEAC 


fwrite(buf, sz, n, fd) char *buf; int sz, n, fd; { 
if(write(fd, buf, n*sz) == —1) return (0); 
return (n); 


write(fd, buf, n) int fd, n; char *buf; { 
char *cnt; /* fake unsigned */ 
cnt.=-n; 
while(cnt— —) { 
Uwrite(*buf+ +, fd); 
if(Ustatus[fd] & ERRBIT) return (—1); 


return (n); 


Then compile them and put them in CLIB.REL as indicat- 
ed in the notes at the end of this article. Finally, using 
AR.COM, put them back into CLIB.ARC. 


Uputsec( ) 
The function Uputsec( ) in CSYSLIB always assumes that 
the sector being written is at the end of the file. Conse- 
quently, it always initiates the next sector with the value 
1A. This is bad if you are using random access techniques, 
because it overwrites existing data with 1A bytes. 

This fix makes Uputsec( ) realize that it is not neces- 


sarily at end of file. Using AR.COM, extract CSYSLIB.C 
from CLIB.ARC and change it as indicated below: 
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CSYSEIB:C 


Uputsec(fd) int fd; { 
if(flush(fd)) return (NO); 
Uadvance(fd); 
if(Ustatus| fd] &EOFBIT |i Usector(fd, RDRND)) 
pad(Ubufptr[ fd], CPMEOF, BUFSIZE); 
return (YES); 


Then compile it and put it in CLIB.REL as explained in 
the notes. Finally, using AR.COM, put it back into 
CLIB.ARC. 


hier1( ) 

A problem in hierl( ) (file CC31.C) causes the operators 
+ = and — = in expressions like i += p (where p is a 
pointer) to erroneously assign to p instead of i. If p were a 
local pointer, then the assignment is made to the address 
corresponding to the value of i, thus corrupting the sys- 
tem. This problem occurred because, in the effort to as- 
sign attributes to a subexpression from included primi- 
tives and subexpressions, nothing was done to isolate the 
attributes of the receiving field. 

This is fixed by allocating a short temporary array 
lval3[2] for passing to store( ). Using AR.COM, extract 
everything from CC.ARC (or just CC3.C, CC31.C, 
CC32.C, and CC33.C if you already have CC?.REL files). 
Change hier( ) in CC31.C as indicated below: 


CCSEE 


hier 1|(lval) int Ival{_ ]; { 
int k,lval2[8], lval3[2], oper; 


if(k= =0) { 
needlval( ); 
return 0; 
} 
Ilval3[0] = Ival[0]; 
Ilval3[1] = Ival[1 ]; 
if (Ilval[1]) { 
if(oper) { 
push( ); 


rvalue(lval); 


store(lval3); 
return 0; 


} 


Then compile the compiler (only part 3 if you already 
have CC?.REL files for the other parts) and link the parts 
with CLIB.REL, giving a new CC.COM. Finally, replace 
CC31.C in CC.ARC. 


Leading Blanks 


Frank Hayes has reported that because CP/M Plus 
doesn’t load the command tail into its buffer (at 80H) 
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with a leading blank, as CP/M 2.2 does, the Small-C func- 
tion Uparse( ) misses a character, often causing it to fail 
to recognize a redirection specification. 

This correction to Uparse(_) removes the assumption of 
a leading blank, making Uparse( ) work correctly with 
either CP/M 2.2 or CP/M Plus. Using AR.COM, extract 
CSYSLIB.C from CLIB.ARC. Change the first few lines in 
Uparse(_) to read as follows: 


CSYSLIB.C 

Uparse( ) { 
char *count, *ptr; 
count = 128; 


ptr = Ualloc((count = *count&255)+1, YES); 
strncpy(ptr, 129, count); 
Uvec[0]=Uarg]; 


Compile and assemble CSYSLIB and replace it in CLIB- 
-REL. Using AR.COM, also replace the source in CLIB- 
ARC. Finally, compile, assemble, and link any Small-C 
programs that run under CP/M Plus. 


Notes 

(1) In the source statements shown above, the capital letter 
‘“U” prefixes many global variable and function names. 
Older copies of Small-C used the underscore character 
‘* _” in this position to avoid conflicts with user-declared 
names. Because some versions of Macro-80 will not handle 
a leading underscore on external references, underscores 
were changed to the letter “U”’ to make them acceptable to 
Macro-80. There is no significance to the use of upper case 
except that it stands out in the source listing as a unique- 
ness prefix instead of as part of the name proper. In mak- 
ing corrections, you should use “U” or “ _” according to 
the usage in your existing runtime library. 

(2) The commands to replace a module in CLIB.REL are: 


LIB80 

*NEWLIB= 

*CLIB< .. prevmodule> 
*module 
*CLIB<nextmodule.. > 


‘“‘Prevmodule” is the name of the module preceding the 
one being replaced, “module” is the one being replaced, 
and ‘“‘nextmodule”’ is the one following the one being re- 
placed. This will leave the old library named CLIB.REL 
and create a new one named NEWLIB.REL. When you 
are sure the new library is okay, delete the original library 
and rename NEWLIB.REL to CLIB.REL. To find the or- 
der of the modules in the original library or to verify the 
new library, execute the following commands: 


LIB80 


*libname/L 
oh 
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————————— nnn 


‘““Libname’” is the name of the library being checked. 


Addendum—Small-Mac Assembler 
A companion assembler to the Small-C compiler is now 
available. Small-Mac is a complete relocatable macro as- 
sembler package written in Small-C, for use with the 
Small-C compiler. It runs on 8080/Z80 machines under 
CP/M. Its features include low cost, ease of use, CPU 
adaptability, source code distribution, and educational 
value. 

The following programs are included: 


MAC macro assembler 

LNK linkage editor 

LGO load-and-go loader 

LIB library manager 

CMIT CPU configuration utility 
DREL dump relocatable files 


MAC is a two-pass, table-driven, relocatable macro as- 
sembler. It “learns” the target machine from a machine 
instruction table (MIT), which is created with a text edi- 
tor and compiled with the CMIT configuration utility. It 
generates relocatable object modules in the 8-bit Micro- 
soft format. MAC is invoked with a simple command syn- 
tax and issues descriptive error messages. 

LNK combines specified object modules with modules 
found in specified libraries to create executable programs. 
Its default output is a standard .COM file. However, it can 
generate “load-and-go” (.LGO) files for execution at any 
desired address. 

LGO loads and optionally executes .LGO files. It pro- 
vides a convenient way to invoke operating system exten- 
sions at cold start time. 

LIB builds, maintains, and lists the contents of LNK 
compatible libraries. 

CMIT compiles machine instruction tables, lists them, 
and optionally configures the assembler with the resulting 
object table. 

DREL produces a formatted dump of .REL and .LIB 
files. 

Small-Mac instruction operands may contain expres- 
sions of any complexity. Expression operators and prece- 
dence rules follow the C language. The Small-Mac macro 
facility is easy to learn, remember, and use. Conditional 
assembly and repeat pseudo-ops are not supported at this 
time. 

Small-Mac comes on two 8-inch SSSD diskettes con- 
taining both source and object files. A 64-page manual is 
included. Send $30 (plus $4 for postage and handling, 
plus $6 for overseas air mail) to: 


J. E. Hendrix 
Box 8378 
University, MS 38677 


DD] 
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Asynchronous Protocols 


by David W. Carroll 
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in Ward Christensen’s MODEM 

program for data exchanges be- 
tween dissimilar CP/M 8-bit comput- 
ers, the XMODEM communications 
protocol has grown until it is now sup- 
ported by almost every commercial 
communications package for 8- and 
16-bit micros, by numerous public do- 
main terminal programs, by most re- 
mote bulletin board and file exchange 
systems, and even by a recent imple- 
mentation on CompuServe. But is 
XMODEM the only answer? This arti- 
cle focuses on the state of currently 
available asynchronous protocols and 
on the reasons for their development. 


|- rom its quiet beginnings in 1977 


Why Protocols? 

Software communications protocols 
are often necessary to allow commu- 
nications between computer systems. 
Predefined protocols are required in 
many cases to allow reliable, error- 


Background 

Most microcomputer systems sup- 
port asynchronous serial communica- 
tions. This means that each byte of 
data is sent as a self contained unit; 
the data flow is made up of discrete 
characters, each completely indepen- 
dent from the others. To allow the re- 
ceiving computer to detect and inter- 
pret incoming data, a start bit is sent, 
followed by a given number of data 
bits making up the character (usually 
5, 7, or 8), followed by one or two 
stop bits. Bell Laboratories developed 
this technique in 1924 for use in tele- 
typewriter communications systems. 
The receiving system must resynch- 
ronize with each character sent. 

In the 1950s, military and com- 
mercial teletypewriter systems imple- 
mented a simple method of error 
checking by adding a bit to the data 
to indicate the parity of the data bits 
making up each character. Parity 


A status report on what Bell Labs, with some help 
from Ward Christensen and others, hath wrought. 


free data communications between 
dissimilar computer systems. Lack of 
hardware DMA or interrupt capabili- 
ty, error checking and correction of 
data, binary file transmission, use of 
different microprocessors and disk 
operating systems, and provision for 
micro-to-mainframe links, multiple 
file transfers, and unattended opera- 
tion are several specific reasons for 
using protocols. 


David W. Carroll, P.O. Box 699, 
Pine Grove, CA 95665. 
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checking indicates to the receiver 
that the number of “1” bits in the 
character should be either odd or 
even (hence “odd” and “‘even”’ parity 
schemes). Parity checking provides 
about a 94 percent probability of de- 
tecting an error in received data. 
There is no method for correcting a 
detected parity error. 

A 5-bit code (like Baudot) allows 
for a total of 32 characters (58 char- 
acters with the figures/letters mode- 
shifting scheme used in telex sys- 
tems) and is still used in telex 
communications today. Many other 
character-coding schemes have been 
developed, but the 7-bit United 
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States American Standard Code for 
Information Interchange (USASCII 
or simply ASCII), defined in the 
ANSI X3.1 standard of 1967, is the 
most widely used standard for mi- 
cros. This code has 128 possible char- 
acters and includes numbers, upper- 
and lower-case English alphabet, 
punctuation, and control codes. 

The 7-bit ASCII code, with or with- 
out parity checking, has long been a 
standard for time-shared mainframe 
remote terminal communications, 
mainly because the Teletype ® model 
33 machine was the most common 
time-sharing terminal during the 
1960s and 1970s. 


Simple Protocols 

The advent of microcomputers and 
low-cost modems in the past 10 years 
has generated a need for a simple, in- 
expensive and reliable way to ex- 
change program and data files con- 
taining 8-bit binary data, as well as 
text files made up of standard ASCII 
characters. The IBM PC further ex- 
panded this need with its extended 8- 
bit character set made up of 256 
characters. As more and larger data 
files are being transmitted over ordi- 
nary telephone lines, more elaborate 
error detection and automatic correc- 
tion are also required. 

In asynchronous time-sharing re- 
mote links, data is sent arbitrarily by 
the transmitting system, without re- 
gard for the capability of the receiv- 
ing system to accept it. When the 
character is sent on to a terminal sim- 
ply for display or for storage in a 
memory buffer, this does not present 
a problem. However, when files of 
data are transferred, the receiving 
system periodically must dump the 
data to a disk file. In many hardware 
configurations, this requires all of the 
system’s resources; it can no longer 
handle incoming data during the 
dump period. Thus, to avoid data loss 
the receiver must have some way to 
halt the data flow from the sender. 

Some simple protocols have been 
developed to allow unformatted text 
transmission between mainframes 
and microcomputers. Three basic 
methods control the data flow: hand- 
shaking, delay, and interruption. Use 
of handshaking involves sending a 
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character (usually a carriage return) 
at the end of each line and requires the 
return of a character (usually a line 
feed) before flow resumes. The second 
alternative is for the sending system to 
delay a predetermined number of sec- 
onds after transmitting each line of 
text to allow the receiving system to 
empty its data buffer when required; 
this method works, but it can slow 
down communications dramatically. 
The interruption method has the sys- 
tem send data until it receives an in- 
terrupt character then pause until it 
receives the resume character. This 
protocol is perhaps the most efficient 
because it allows continuous transmis- 
sion until the buffer is full, ensuring 
maximum throughput. 


CR-LF Protocol 

One common file transfer method 
used to prevent buffer overflow in 
time-sharing systems is to transmit 
one ASCII line of text at a time, in- 
cluding the carriage return character, 


oes your ISAM 
run oniBM, 
APPLE. DEC 
anc] AT&T 
GOmMPUCerPSY 
e-¢ree GloeS) amnG! 
yeu enil7 BUY 

iT ONCE? 


2606 Johnson Drive 
Columbia MO 65203 


then to wait for the receiver to send a 
line feed as acknowledgement. Often 
a delay of several seconds is added be- 
fore the next line is transmitted. CR- 
LF is the most common example of the 
handshaking technique, although 
prompt sensing is another popular 
method used for uploading to an edi- 
tor or BASIC interpreter. 


XON—XOFF File Capture Protocol 
Possibly the most common text file 
transfer protocol in use today is the 
file capture or XON—XOFF-protocol 
offered on almost all time-shared 
mainframe computers. This protocol 
detects two characters—usually AS- 
Cit DCL..and DC3 (*Q and: <8). 
XOFF or *S pauses transmission and 
XON or *Q resumes transmission. 
This protocol, another holdover from 
teletypewriter terminals, was used on 
teleprinters for paper tape operations. 

Today, this file capture mode is 
used to transfer text files between 
dissimilar computer systems. Data is 





Circle no. 37 on reader service card. 


93 


captured to a memory buffer, and 
XOFF is sent when the buffer is near- 
ly full. When transmission stops, the 
data in the buffer is written to disk. 
Care must be taken to ensure that the 
text file does not contain any *Q or 
*S characters (as in WordStar files). 

This protocol is supported by Com- 
puServe, The Source, all three major 
data networks, and most time-shar- 
ing host computers and bulletin 
board systems. It supports only parity 
checking and 7-bit ASCII file trans- 
fers on most systems. 


HEX File Conversions 
Many older host computers and 
front-end communications processors 
do not support 8-bit data transfers 
over asynchronous links. How then 
can these systems (like CompuServe 
until recently) send binary data files? 
A program converts the binary 
data to ASCII characters represent- 
ing the hexidecimal value of the data. 
Thus, each 8-bit data byte ends up as 
two ASCII characters. For example: 


Binary ASCII 
Oto 1011s > 6B 
11100001 — El 
OOPS TER = = 3F 


These “characters” can be sent easily 
as text—but what about errors? To 
resolve this problem, a line format is 
used that includes a checksum of the 
characters, similar to Intel Hex for- 
mat (CP/M-80, etc.). Obviously, this 
method is both inefficient and time 
consuming: it involves translations at 
both ends and more than doubles the 
transmitted size of the original file. 
CompuServe supports this proto- 
col, but it is becoming less popular 
than some others, like XMODEM. 


XMODEM 

Determined to solve the problem of 
file transfer, Ward Christensen, a 
skilled programmer in Chicago, de- 
signed a block-oriented file transfer 
technique that allows for text and bi- 
nary file transfer with simple, yet ef- 
fective, error checking. His first ver- 
sion of the program, called MODEM, 
was written in September 1977 and 
appeared on CP/M User Group Disk 
25. It allowed two microcomputer us- 
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ers, each running the CP/M 80 oper- 
ating system, to exchange both ASCII 
text files and 8-bit binary .COM files 
by modem or direct connect. (In the 
early days, there were many different 
types of CP/M systems, and most disk 
formats were not compatible, so di- 
rectly transferring files over a com- 
munications link was often the only 
way to move programs from one type 
of computer to another. ) 

MODEM protocol transfers are 
made up of blocks of 132 bytes: four 
header bytes, consisting of a start of 
header (SOH) ASCII character, the 8- 
bit block number, the one’s comple- 
ment of the block number, and the 8- 
bit checksum, plus 128 data bytes. The 
receiver controls the sending of each 
block and any necessary retransmis- 
sions by sending an acknowledge 
(ACK), negative acknowledge (NAK), 
or cancel (CAN) ASCII code in re- 
sponse to each block. Timeouts are 
used as a further check of transmission 
accuracy and for resynchronization. 

By 1979, BYE, an unattended sys- 
tem control program, and XMODEM, 
the unattended version of MODEM, 
were Operating in bulletin boards 
across the country. Most file transfer 
systems were based on MODEM, BYE, 
and XMODEM, as well as on the pro- 
grams written (in part by Ward Chris- 
tensen) for one of the first microcom- 
puter-based Computer Bulletin Board 
System (CBBS) ® in Chicago. 

A large number of “‘improve- 
ments’ to the first MODEM program 
have been written, and dozens of 
commercial and public domain pro- 
grams now support the XMODEM 
protocol. Recently, the basic protocol 
definition was expanded to include 
optional Cyclic Redundancy Check 
(CRC) error checking, an improve- 
ment on the simple checksum method 
used in the original programs. CRC 
ensures a 99.99 percent probability of 
detecting errors. The CRC polynomi- 
al is specified by the CCITT interna- 
tional telecommunications standards 
organization. 


MODEM Protocol 

Mark M. Zeigler and James K. Mills 
wrote the MODEM7 CP/M 80 pro- 
gram in 1980. The MODEM7 proto- 
col is an adaptation of the original 


MODEM/XMODEM protocol de- 
fined by Ward Christensen. The MO- 
DEM7 program adds the ability for 
wildcard and multiple file transfers 
to the basic XMODEM protocol, as 
well as optional CRC error checking. 
Bruce R. Kendall translated the 
MODEM7 program to 8086 code for 
CP/M 86 and MSDOS in 1983; it is 
still used by many as a primary com- 
munications program. The MODEM7 
protocol is supported by the FIDO 
bulletin board software. 
Interestingly, Crosstalk and Cross- 
talk XVI (probably the most popular 
commercial communications pro- 
gram) do not properly support XMO- 
DEM transfers to all systems and do 
not support CRC mode at all. A public 
domain subprogram is available for 
16-bit systems to correct this problem. 


KERMIT Protocol 

KERMIT (the protocol, not the frog) 
was developed at Columbia Universi- 
ty and released to the public domain 
to allow efficient transmission of 8- 
bit binary data on systems that are 
hardware limited to 7-bit ASCII. The 
KERMIT method encodes the binary 
data into acceptable ASCII charac- 
ters for transmission, but it uses more 
than four bits of each character (see 
the HEX scheme above) and uses a 
block rather than a line error-check- 
ing protocol to achieve much greater 
efficiency. KERMIT also allows mul- 
tiple file transfers and master/slave 
operations. 

KERMIT is available for most mi- 
crocomputers and many mainframes 
at little or no cost. It presently is sup- 
ported by the FIDO bulletin board 
system and Telois commercial micro 
communications software. It may be- 
come a widely used standard in the 
near future. 


Microcom Networking Protocol 

The Microcom Networking Protocol 
(MNP) is an interesting attempt by a 
commercial company to define an in- 
dustry standard. Microcom, maker of 
modems and communications soft- 
ware, defined their protocol in 1982. 
It has been accepted by IBM, Tym- 
net, Telenet, and some others as a 
standard. Also, the data networks ac- 
cept it as a way to provide an error- 
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free “local” link to their access nodes. 
MNP is used in Microcom’s ERA 2 
communications software and in 
IBM’s Personal. Communications 
Manager program (written by Micro- 
com). It is also supported by the latest 
version of RBBS-PC (12-4A1). 


CompuServe A & B Protocols 
CompuServe has defined two proto- 
cols for use with its VIDTEX service 
and provides software to support them 
on several computers, including most 
TANDY (TRS-80) computers, the 
Apple, and the IBM-PC. 

CompuServe A protocol, originally 
developed to allow binary file trans- 
fers from the mainframes used by the 
service, was later updated to the cur- 
rent protocol. It is used to upload and 
download binary files. CompuServe 
B protocol is used primarily with 
Tandy (Radio Shack) TRS-80 com- 
puters for file transfers and support 
of full-color video graphics (VID- 
TEX) capabilities. 

CompuServe also supports BIN 
and HEX file 7-bit ASCII transfers in 
modified Intel Hex format. 


ANSI X3.28 Protocol 

With the demand for reliable commu- 
nications, it is surprising that the ANSI 
X3.28 protocol (originally defined in 
1971) was not implemented on micro- 
computers until this past year. The 
X3.28 protocol is similar to MODEM7 
and KERMIT. It provides block trans- 
mission with CRC-type error checking, 
remote system master/slave control, 
and multiple file transfers. 

Artisoft Inc. of Tucson, Arizona, 
has included X3.28 protocol support 
in its Envoy-PC communications 
software, as well as file capture and 
XMODEM. Recently, X3.28 has re- 
ceived attention as a possible protocol 
for use in local area networks. 


Specialized Protocol Software 
Several software vendors have devel- 
oped their own protocols for use be- 
tween systems running their pro- 
grams. Some of these include the 
following. 


Crosstalk 


Crosstalk and Crosstalk XVI by Mi- 
crostuf both support a 256-byte 
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block, error-checking protocol (also 
called CLINK) similar to MODEM7 
that allows multiple file transfers. 
Later versions of Crosstalk also sup- 
port XMODEM. 


Smartcom 

Smartcom and Smartcom II support 
the Hayes Verification Protocol, a 
special error-checking protocol de- 
signed by Hayes Microcomputer 
products for file transmission. Smart- 
com II also supports the XMODEM 
protocol. 


Telink 

The Telink protocol is supported by 
the Telink program and Minitel pub- 
lic domain communications program, 
written by Tom Jennings, and by the 
FIDO bulletin board system, also 
authored by Jennings. All programs 
support MODEM7 and XMODEM as 
well. 


Move-It 

Move-It from Woolf Software uses a 
proprietary “‘packet” protocol with 
16-bit checksums, message number- 
ing, and remote multiple file transfer 
capability. Move-It does not support 
XMODEM. 


MITE 

MITE (Mycroft Intelligent Terminal 
Emulator) from Mycroft Labs sup- 
ports all of the above protocols (ex- 
cept Telink) plus the following: 


¢ XMODEM checksum and CRC 

e MODEM7 checksum and CRC 
(called XMODEM /Batch) 

¢ MITE batch block protocol (see 
DDJ, August 1982) 

¢IBM PC (text protocol from IBM 
Asynchronous Support Program) 
¢ TEXT (simple Hex transfer proto- 

col) 


ASCOM 

The ASCOM program from Dynamic 
Microprocessor Associates supports 
XMODEM (called CPMUG) as well 
as two checksum block protocols, 
BLOCK and BLOCKY. 


Summary 
A number of asynchronous protocols 
have evolved to fill the need for reli- 


able file transfers of both text and bi- 
nary data between various types of 
mainframes and microcomputers. 
The most widely used standard is the 
XMODEM protocol originally de- 
fined by Ward Christensen, but even 
this protocol has four possible for- 
mats (checksum/CRC and single 
file/batch). Most commercial and 
public domain file transfer programs 
support at least the basic checksum, 
single file version of the XMODEM 
protocol. XMODEM is simple, fairly 
unambiguous, and easily implement- 
ed in a variety of languages, from C 
to BASIC. 

Transfers from 7-bit mainframe 
host systems are still a clumsy and 
time-consuming process. The KER- 
MIT protocol, which improves the ef- 
ficiency of these transfers, is now 
available in a number of formats for 
many different computers. 

Several other proprietary protocols 
have been developed, but none has re- 
ceived the widespread acceptance of 
XMODEM. With XMODEM so well 
entrenched, it is unlikely to be re- 
placed by another protocol for several 
years, if at all. 


DDJ 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 194. 


C CODE FOR THE PC 


source code, of course 


Concurrent C . $45 
LEX $25 
YACC & PREP $25 
Small-C compiler for 8086/88 . $20 
tiny-c interpreter & shell . $20 
Xlisp 1.4 & tiny-Prolog $20 
C Tools $15 
The Austin Code Works 
11100 Leafwood Lane 
Austin, Tezas 78750-8409 
(512) 258-0785 
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C CHEST 


by Allen Holub 


The main topic of this month’s col- 
umn is the Unix! “make” utility. 
We'll talk about how make works, re- 
view a few versions that run under 
MSDOS, and present the complete 
source for a rather stupid, but none- 
theless functional, version of make 
for MSDOS. 

However, before leaping into 
make, I'd first like to thank everyone 
who sent in sort routines. Several of 
the routines are quite spiffy; we'll 
definitely have another sorting col- 
umn in the next few months. 

Next, some good news for Lattice 
C users: they’ve finally cleaned up 
their manual. The old manual was so 
poorly organized as to make the com- 
piler almost useless to someone who 
wasn’t thoroughly familiar with 
Unix. Critical information was scat- 
tered over several appendixes and a 
myriad of technical bulletins. This 
wouldn’t have been a problem if Lat- 
tice had published a new index with 
each addendum to the manual, but no 
such luck. As far as I can tell, the new 
manual uses the same text as the old 
one; however, it’s now organized into 
a coherent whole with a real index 
(they even highlight function names 
in blue). If you own version 2.1x or 
later of the compiler, you can get a 
free update to the new version (2.15) 
and a copy of the new manual by 
sending Lattice your original release 
disks. Older versions of the compiler 
(including Microsoft and Lifeboat 
versions) can be updated for a fee 
ranging from $50 to $100, depending 
on the version. If you have an older 
version of the compiler and just want 
the new manual, send Lattice the ta- 
ble of contents and index from the old 
manual and they’ll send you the new 
one (but no software update). 

Finally, while rooting through a 
friend’s back issues of the PC Tech 
Journal, 1 discovered MSDOS’s un- 
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documented SWITCHAR feature in 
an article by J. Eric Roskos (August 
1984, page 73). It’s a constant annoy- 
ance to me that command.com insists 
on using \ to separate directory 
names in a path and / as a command 
line switch designator (Unix pro- 
grammers are used to / and -, respec- 
tively). This seemed all the more 
onerous when I discovered that 
MSDOS itself accepts either a \ or / 
in a path name. Only command.com 
and a few utility routines insist on 
specializing the two. 

Well, it turns out that if you in- 
clude the line 


SWITCHAR = - 


in your config.sys file, command.com 
will use a - instead of a / as its com- 
mand line switch designator (you can 
replace the - with any printing char- 
acter). Because / is no longer special, 
command.com passes it through to 
DOS where it’s accepted as a legal 
path name designator. Moreover, the 
path printed by the “prompt $p” 
command will now use slashes in- 
stead of back-slashes when it displays 
the path! 

I’ve no idea how this mechanism 
actually works, though I suspect it 
Operates in ways similar to an envi- 
ronment variable. If anyone can en- 
lighten me, please write. On page 113 
of the same issue of the PC Tech 
Journal, Daniel Frank shows how to 
use DOS function 37 (also undocu- 
mented) to get the current switch 
character. Frank also presents a few 
SWITCHAR caveats. To summarize: 
RESTORE can get very confused if 
the SWITCHAR is set when you run 
BACKUP, so don’t use the SWIT- 
CHAR if you’re doing a backup. The 
same article gives a patch to RE- 
STORE to fix this problem; the inter- 
ested reader can find it there. 








Unfortunately, in a fit of perversi- 
ty, Microsoft elected not to support 
SWITCHAR in DOS version 3. The 
operating system spits out the mes- 
sage: ““Unrecognized command in 
CONFIG.SYS.” Argh. All is not lost, 
though. Unipress, the manufacturer 
of Ps-make, reviewed below, sells a 
program that changes the switch 
character, and this program does 
work with version 3. 


Make 
Make is one of those deceptive utili- 
ties: you can’t figure out why anyone 
would bother to use it until you actu- 
ally do use it, then you can’t figure 
out how you got along without it. 
Make takes as input a makefile, 
which describes all the modules in a 
large program and the relationships 
between the modules. Using the 
makefile, make determines which 
modules must be recompiled at any 
given moment and then compiles 
them (and only them). It’s like an in- 
telligent batch utility that knows how 
C programs and C compilers work 
and does only those actions that are 
absolutely necessary. | 

The best way to explain make is 
with an example. You’ve an execut- 
able program called farm.exe. The 
original source is split up into three 
modules: cow.c, pig.c, and farm.c. All 
three modules have an #include 
<stdio.h> statement in them. In ad- 
dition, cow.c and pig.c have an #in- 
clude <animals.h> statement. 
Now, if you change something in 
cow.c, you need to recompile cow.c 
and then relink the new cow.obj into 
farm.exe. If you change something in 
animals.h, you need to recompile 
both cow.c and pig.c then relink. If 
you change stdio.h, you need to re- 
compile everything. Make describes 
the relationships between these vari- 
ous files as “‘dependencies.’’ The 
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makefile is a list of these dependen- 
cies. A makefile for the program just 
described is shown in Figure 1 
(below). 

The # designates a comment line. 
Farm.exe “depends on” cow.obj, pig 
.obj, and farm.obj. This means that if 
any of the files cow.obj, pig.obj, or 
farm.obj have been changed more re- 
cently than farm.exe, then farm.exe 
must be remade—by executing the 
line: link \Ic\s\c cow pig farm,farm, 
con,\lc\s\lc. Similarly, if any of the 
files pig.c, stdio.h, or animals.h have 
been changed more recently than 
pig.obj, then pig.obj must be remade 


(using the command lc -ms -i\lc\ 
-i\lc\s\ pig). The actions associated 
with each set of dependencies can ex- 
tend to several lines. To activate the 
process, you just type the command 
make. Make reads in the makefile 
and, using the information found 
there, figures out what to do and does 
it. 

Make supports several options that 
make your life a little easier. You 
may use macros to save some typing. 
A macro is created by placing the fol- 
lowing definition at the head of the 
makefile: 

name = stuff 


# Make farm using the Lattice C compiler. 


: 2 . 


_ farm.exe: — 








: cow. ae pig. obj farm.0b) its 
- _ s link \le\s\c ¢ cow pig farm, farm, con, n,\le\s\lc 


cc cow.e stdio.h animals. 





— pig.obj: 


on c etdio. h 





ic a ae “\e\s\ cow 
pig. c Petco. h animals.h 


Ic -ms SNe “iNle\s\ pig 


: Ie - -ms s ‘Nic\ ee farm : 
_ Figure 1. 


: - | A Simple Makefile le 














‘stdio. A ape bh 


$ (OBJECTS) 


= So cow 


come pig 





stdio.h farm.c 
$(COMPILE) farm 


farm obj: 


using the Lattice C com piler. 


= cow. o pig. oo farm. obj 


- $UINCLUDES) cow.c 





7 link \Ic\s\c $ (OBJECTS), farm, con, No\s\e | 


Figure 2. 
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A Makefile with Macros 


PROGRAMMERS’ 





db_VISTA 


PREFERRED 
over ISAM 
and file utili- 

ties, POWER 

likeamainframe 
DBMS, PRICE likea 

microcomputer utility, 
PORTABILITY like only 

C provides. 


MS-DOS/UNIX 
db_VISTA FEATURES 


Written in C for C. 

Fast B™-tree indexing method. 
Maximum data efficiency using 
the network database model. 
Multiple key records—any or all 
data fields may be keys. 
Multi-user capability. 
Transaction processing. 
Interactive database access utility. 
Ability to import and export 
dBASE II/IIl and ASCII files. 







NO ROYALTIES 
SOURCE CODE INCLUDED 
MONEY BACK GUARANTEE 


db_VISTA PRICE 


$195 
$495 
$495 
$990 


Single user without source 
Single user with source 
Multi-user without source 
Multi-user with source 


MC/VISA/COD 


Available for the Lattice, Microsoft, 

Computer Innovations, DeSmet and 

Aztec C compilers under MS-DOS, 
and most UNIX systems. 


RAIMA 


CORPORATION 
11717 Rainier Avenue South 
Seattle, WA 98178, USA 
(206) 772-1515 Telex 9103330300 


CALL TOLL-FREE 
1-800-843-3313 
At the tone, touch 700-992. 
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where name is the macro name and | Figure 2 (page 97). 

stuff is the text to be substituted. In You can simplify the makefile even 
the makefile the macro is expanded | further. Notice that all .c files are 
by $(name). Our original makefile, | converted to .obj files with the same 
rewritten using macros, is shown in | set of actions. Make provides a mech- 





from your C programs 
with 


PC—LINT 














PC—LINT analyzes your C programs (one Ain ah 
or many modules) and uncovers glitches, 3 iG:0R)y 
bugs, quirks and inconsistencies. It will catch farmmob. 
subtle errors before they catch you. rr———OCOCN 
PC—LINT resembles the Lint that runs on 
the UNIX O.S. but with more features and 


greater sensitivity to the problems of the 
8086 environment. 


° Full K&R C fo 


¢ Supports Multiple Modules—finds incon- / - Make farm using th 
sistencies between declarations and use Ft = ——rr—“——OSsSs 


of functions and data across a set of 
modules comprising a program. 


© Compares function arguments with the — farm.exe 
associated parameters and complains if — 
there is a mismatch or too many or too 
few arguments. 


¢ All warning and information messages cow.obj: 
may be turned on and off globally or . : 
locally (via command line and comments) 
so that messages can be tailored to your — 
programming style. pig.obj: 

¢ All command line information can be ‘ 
furnished indirectly via file(s) to automate 
testing. 


® Use it to check existing programs, pro- 
grams about to be exported or imported, 
as a preliminary to compilation, or prior 
to scaling up to a larger memory model. 


¢ All one pass with an integrated pre- sia 
processor so it’s very fast. # Null tar 
© Has numerous flags to support a wide - 
variety of C’s, memory models, and 
programming styles. 
— animals.h 


¢ Introductory Price: $98.00 MC, VISA 
(Includes shipping and handling) PA residents add 6% 


sales tax. Outside USA add $10.00. : : - st di oh: 
© Runs on the IBM PC (or XT, AT or 

compatible) under DOS 2.0 and up, with oS 

a minimum of 128KB of memory. It will _ ~pig.c- 

use all the memory available. | 


CIMPEL SOFTWARE 


3207 Hogarth Lane © Collegeville, PA 19426 
(215) 584-4261 


* Trademarks: IBM (IBM Corp.), PC—LINT (Gj 
UNIX (AT&T) pP) (Gimpel Software), 


COW.C: 
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anism for doing this sort of repetitive 
action, called a “generic dependen- 
cy’. Consider the makefile shown in 
Figure 3 (page 98). 


The lines: 


.c.ob}: 
l¢ -ms.-1\JeX -i\ic\s\:$* 


say “to turn a .c file into an .obj file, 
execute the line Ic -ms -i\Ic\ -i\Ic\s\ 
$*°’ where $* is a predefined macro 
that evaluates to the root portion of 
the file being made (the one to the 
left of the : on the dependency line). 
For example, given the dependency 
line: 


foo.obj: foo.c rat.h 


$* will evaluate to the string foo. In 
the case of this generic dependency, 
make assumes that all .obj files de- 
pend on a.c file having the same root 
name. So, when foo.obj is being 
made, a dependency on foo.c is as- 
sumed, and it need not be listed on 
the dependency line. 

There are several commercially 
available make utilities that run on 
MSDOS. (See the review of MSDOS 
C compilers on page 30 for compilers 
that include a make utility in the 
standard distribution package. You 
can’t have a make for CP/M because 
you can’t time and date stamp a file. ) 
I looked at three of these: Polymake 
(by Polytron), Ps-make (by Unipress 
Software), and Pmaker (by Phoe- 
nix).2 Of these, Polymake (at $99) is 
both the least expensive and the most 
complete implementation of make. 
Ps-make (at $179) is missing some of 
the features of Polymake. Pmaker, 
the Phoenix product (at $195), is 
both the most expensive and the most 
limited of the three versions. The 
Pmaker manual is extremely sparse. 
Pmaker supports virtually no com- 
mand line options and only a 
stripped-down set of internal utilities 
(no predefined macros, no generic de- 
pendencies). It does come with a util- 
ity that creates makefiles (by going 
into your source code and looking for 
#include statements), but because 
my makefiles are often a little weird, 
I found this utility pretty useless. 
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Frankly, I don’t think that Pmaker is 
worth the money. In fact, the version 
of make presented at the end of this 
column is almost as powerful as the 
Phoenix product—and it’s free. I'll 
therefore limit my remarks to Poly- 
make and Ps-make. 


Polymake 

Polymake supports all the make fea- 
tures described above. It has 13 com- 
mand line options: 


-a 
Rebuild all targets, even if time and 


date say that you don’t have to. 

-b <file> 

Look for a file called builtins. mak— 
Polymake supports a default actions 
file in which you define things like 
.c.obj. or macros that are used a lot. 
-C 

Create a batch file rather than doing 
the action—this lets you use Poly- 
make with DOS version 1. 

-d 

Echo an execution trace as actions 
are performed—debug mode. 

-f <file> 

Use <file> as the makefile instead 


Now for the 
IBM PC, XENIX, UNIX, VMS... 


WINDOWS FOR C™ 


Advanced Screen Management 
Made Easy 
A video tool kit for all screen tasks 


M@ Pop-up menus and help files 

@ Unlimited files and windows 

M@ Rapid screen changes 

@ Logical video attributes 

@ Complete color control 

® Horizontal and vertical scrolling 


@ Word wrap 
@ Highlighting 


@ Plus a library of over 65 
building block subroutines 


So easy to learn and easy to use, 
you Il wonder how you ever managed 
without it. 


Provides application portability 
between the IBM PC and XENIX, UNIX, 
VMS or any terminal-based system. 
Full support for IBM PC/XT/AT and compatibles; Lattice C, C1-C86, Mark Wm. C, 


Aztec C, Microsoft C, DeSmet C (PC/MSDOS); PC/XENIX. Source version available 
for Unix and other OS. 


NEW Ver. 4.0 


Logical attributes 
Easier menus 

New pop-up functions 
WINDOWS FOR C 
PCDOS 

(specify compiler) ) $245 
PC/XENIX $495 
UNIX and other OS Call 


Full Source Available 


Trademarks 





Vermont 
Creative 
Software 


21 Elm Ave. 
Richford, VT 05476 


802-848-7738, ext. 31, 
Master Card & Visa Accepted 


Shipping $2.50 
VT residents add 4% tax 


- UNIX, AT&T; XENIX, Microsoft; VMS, DEC. 
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of ‘‘makefile.” 

-i 

Ignore errors returned from the 
programs. 

-k 

Keep working and ignore error codes 
returned from a process. (Like the 
Unix version, if any program invoked 
by Polymake returns a value other 
than 0, Polymake terminates. This 
can be annoying if you want to com- 
pile 85 modules and go to lunch, redi- 
recting all the error messages into an 
error log file. The -i option suppresses 


reading the manual, I’m not clear 
about the differences between -i and 
-k. P’ve been using -k.) 

-n 

Print out the various actions but 
don’t actually execute them—this is 
useful for debugging a makefile. 

-p 

Print out a representation of the 
makefile after it’s been interpreted. 
-q 

Don’t print out error messages from 
commands. 

-r 


this automatic termination. From | Don’t use any builtins.mak files (see 


eS eV Te 


eT 
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option -b above). 

-s 

Don’t echo commands (silent). 

-t 

Touch. (Perhaps the most useful op- 
tion supported by make, -t is for the 
situation where you change a com- 
ment in stdio.h and now make thinks 
that all 97 modules of your program 
monster.exe have to be recompiled; 
make -t modifies all the times and 
dates for files to be made so that they 
look as if they’ve been recompiled, 
but it doesn’t actually recompile 
them. Polymake also comes with a 
touch utility (invoked from MSDOS 
with “‘touch <file list>”’) that sets 
the time and date of the indicated 
files to the current time and date. ) 


There’s also a rich set of prede- 
fined macros: 


$(name) Expand macro “name” 
$$ $ sign 

$@ Name of current target 
$* Root of current target 
$< Source being used to 


make current target 

$? All sources that have 
been modified more re- 
cently than current target 


$(_) Null string 

$(mflags) Command line flags (so 
that make can invoke it- 
self recursively) 

$(cwd) Current working 


directory 


Finally, Polymake supports several 
internal options, as well as generic 
dependencies. Although I won't de- 
scribe all of them here, one is quite 
useful: the local input script. This 
feature is for programs, such as li- 
brarians and linkers, that sometimes 
need to use input files rather than the 
command line. For example, you can 
have so many files to link together 
that they won’t all fit on a DOS com- 
mand line. In this case, you put the 
command line into a file then call link 
with @file given on the command 
line. Local input scripts let Polymake 
create these input files for you. The 
example given in the manual illus- 
trates the process pretty well: 


text.exe : tl.obj t2.obj t3.obj 
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link <@< 
fi 
t2P 
t3 
test.exe 
test.map 
\Ic\s\le.lib 
am 


All text between the second and third 
< sign is put into a file called 
lis_qqq.tmp. Link is invoked with the 
line link @lis_qqq.tmp. The @ in 
this example can be replaced by any 
printing character. For example, 


text.exe: tl.obj t2.0bj t3.ob] 
link <<< 

text 

=< 


will execute link <lis_qqq.tmp; 
lis_qqq.tmp will contain the single 
line “text.” The temporary file is de- 
leted when Polymake is done with it. 
As you can probably tell, I like 
Polymake. I’ve been using it for a 
month now and haven’t found any 
problems yet. My only complaint is 
that the manual doesn’t have an in- 
dex (which will make it hard to find 
anything if you’re not familiar with 
the Unix make). On the other hand, 
Polymake sticks pretty close to the 
Unix model, so you may not need to 
consult the manual very often. 


Ps-make 

As I said earlier, Ps-make is more 
limited that Polymake, but it does do 
everything I consider to be essential: 
generic dependencies, $@, $*, $<, 
and macros. Several command line 
options are supported (there is some 
overlap with Polymake): 


-f< file> 

Use <file> as the makefile. 

-o< file> 

Use <file> as name of batch file 
(see -b). 

-b 

Create a batch file instead of execut- 
ing commands. 

-B 

Beep before exiting. 

-c 

Don’t convert to lower case when 
evaluating rules. 
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-d 

Print file modifications times used in 
comparisons. 

~e 

Ignore various environment vari- 
ables—the name of the default rules 
file (builtins.:mak in Polymake) is 
kept in an environment variable. 

-p 

Print the generated dependency tree. 
-s 

Don’t execute commands as they’re 
executed. 

-t 

Touch. 

-Vv 

Force Ps-make to verify that a gener- 
ated file exists before using it. 


A MAKE Utility in C 

One of the first utilities I wrote for 
MSDOS was the version of make giv- 
en here. The program’s called mk 
(i.e., a make with half of it missing). 
Mk is pretty stupid; it doesn’t support 
macros or command line switches. 
On the other hand, it does do the crit- 
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COMPILER 
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costing up to 10 times as much: 


Seive Fib 








Code Size 


$4995 


The Eco-C88 C compiler is setting a new standard for price and 
performance. Compare Eco-C88's performance to compilers 
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ical job: recompile only those parts of 
a large modular program that need it. 
I was glad to have it before I got my 
copy of Polymake, and it is, after all, 
free. Mk was designed to help main- 
tain large C programs, and it works 
quite well in this application, but it 
wont do everything that the real 
make can do. 

Mk uses a makefile called 
““mkfile,” which, like the real make- 
file, lists all the dependencies needed 
to make a program. If mk is invoked 
with a name as an argument (1.e., mk 
foo.exe), it will make the indicated 
file; that is, it looks in the mkfile for 
the indicated filename to the left of a 
colon on a dependency line and starts 
the make from that point. If no file is 
specified on the command line, the 
first file listed in the mkfile is made. 

The mkfile itself has a more re- 
stricted syntax than a real makefile: 


(1) A # sign in column | designates 
a comment line. The # must be in the 
leftmost column. 
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Eco-C88 Rel. 2.20, on IBM PC with 2 floppy disks, 256K. 
Benchmarks from Feb., 1985 Computer Language. 


Eco-C88 includes: 

* All operators and data types (except bit fields) 

* Error messages in English with page numbers that reference 
the C Programming Guide - a real plus if you're just getting 
started in C. 

* Over 170 library functions, including color and transcendentals 
* New Library functions for treating memory as a file 

* User-selectable ASM or OBJ output (no assembler required) 
* 8087 support with 8087 sensed at runtime 

* cc and ‘mini-make”’ for easy compiles (with source) 

x Fast, efficient code for all IBM-PC, XT, AT and compatibles 
using MSDOS 2.1 or later. 

* Complete user's manual 
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lf ordered with the compiler, the C library source code (exclud- 
ing transcendentals) is $10.00 and the ISAM file handler (as 
published in the C Programmer’s Library, Que Corp) in OBJ 
format is an additional $15.00. Please add $4.00 for shipping 
and handling. To order, call or write: 












Ecosoft Inc. 
6413 N. College Avenue 
Indianapolis, IN 46220 
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Eco-C (Ecosoft), MSDOS (Microsoft), UNIX (Bell Labs), CP/M (Digital Research), Z80 (Zilog), 8086, 8087, 8088 (Intel). 
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POWER 


C LIBRARIES 
C WINDOWS 


Best You Can Get! 
325 Fully Tested Functions 


Best Documentation 
(over 400 pages) 


SIX C LIBRARIES 
For IBM PC, XT.AT 


All Source Code. No royalties. 
51 screen handling /graphics 
50 cursor/ keyboard /data entry 
85 superior string handling 
25 system status & control 
72 utiity/ DOS /BIOS/time, date 
42 printer control 


RICHLY COMMENTED 
EASY TO LEARN 
EASY TO MODIFY 


NO MATTER WHAT ELSE 


YOU HAVE 
GET THESE!! 


ALL 6 LIBRARIES $99.95 
(ON FOUR DISKETTES) 


POWER 
WINDOWS 


PROFESSIGNAL WINDOW MANAGEMENT 


OVERLAYS, BORDERS,POPUP- 
MENUS,COLOR HIGHLIGHTING, 
HELP WINDOWS, STATUS-LINE, 


MONOCHROME OR COLOR, 
FILE, CURSOR,KEY BOARD 
CONTROL AND MORE !! 


C WINDOWS: COMPLETE SOURCE CODE $99.95 


ALL LIBRARIES 
PLUS 
WINDOW $159.95 


Entelekon 


SOFTWARE SYSTEMS 
ENTELEKON 12118 KIMBERLEY 
HOUSTON, TX.77024 (713)-468-4412 


VISA® MASTERCARD eCHECK 
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(2) The dependency line comes first. 
It uses the format “target: dependen- 
cies”. The colon is required (an error 
message is printed if it’s not there). 
The dependencies are delimited from 
one another with white space (any 
combination of tabs and blanks). The 
dependencies must all be listed on a 
single line; however, any line termi- 
nated with a back-slash (\) will be 
continued to the next line. For 
example: 


This is\ 
one line\ 
of text. 


(3) All files listed as dependencies 
must be used as targets somewhere in 
the mkfile (1.e., to the left of a colon). 
A null target (one consisting of a sin- 
gle filename followed by a colon but 
no dependencies, this in turn followed 
by a blank line) is permitted. 

(4) All lines following the dependen- 
cy line, up to a blank line, are the ac- 
tions executed to make the target. 
The blank line is required to termi- 
nate the block of actions. Any num- 
ber of blank lines are permitted as a 
terminator, but any nonblank line 
following a blank line is assumed to 
be a new dependency line. 

(5S) Targets having no dependencies 
will always be made. For example, 


listing: 
print foo.c bar.c rat.c 


will always execute the print com- 
mand. 

(6) For the sake of comparison, all 
nonexistent files are considered to ex- 
ist and to be very old, so a nonexistent 
file listed to the left of a colon will 
always be made. The dates and times 
associated with a target are updated 
as soon as the target is made. 


Figure 4 (page 98) is a mkfile ver- 
sion of the makefile in Figure |. Here 
the blank lines are required, as are 
the various null targets at the end of 
the file (for animals.h, stdio.h, etc. ). 

The listing for mk starts on page 
104; mydos.h (#included on line 3) 
was presented last month. There are 
several macros at the head of the list- 
ing. #including the #define on line 6 


will cause mk to generate a trace as it 
parses the mkfile, but it won’t actual- 
ly try to do anything. MAXLINE (on 
line 8) limits the number of charac- 
ters in a line (lines continued with a 
terminating \ are considered to be 
one line). MAXBLOCK and MAX- 
DEP (lines 9 and 10) are the maxi- 
mum number of actions that can fol- 
low a dependency line and the 
maximum number of dependencies, 
respectively. MAKEFILE (line 12) is 
the name used for the makefile. The 
three macros on lines 24-26 have 
horrible side effects, so be careful 
with them (don’t ever say skip- 
white(+ +s)). 

I suspect that the real make sets up 
a dependency tree, a multi-way tree 
that has the major file to be made as 
its root and dependencies as children. 
Mk doesn’t work that way. Mk reads 
in the entire mkfile before it tries to 
do anything. If it gets lost (or finds a 
syntax error), an error message is 
printed and mk terminates. 

The makefile is organized as a bi- 
nary tree, ordered alphabetically by 
target filename; the tree nodes are 
typedefed on lines 38—47. Lnode and 
rnode are pointers to children in the 
tree. The target filename (the one to 
the left of the equals sign) is used as 
the search key and stored in the be- 
ing_made field. 

The dependencies and the actions 
following the dependencies are put 
into two argv-like arrays of pointers 
to strings. The fields depends_on and 
do_this are used like argv to access 
these arrays. Both arrays are termi- 
nated with a null entry, so the equiva- 
lent of argc isn’t required. 

Finally, the time field holds the file 
create time and date returned by 
DOS. The time and date are concate- 
nated (with the date in the most sig- 
nificant word). This enables the time 
field to be used as a single number in 
comparisons. 

Most of the routines are comment- 
ed well enough to be self-document- 
ing, but there are some exceptions. 
Gtime(_ ) (lines 97-137) gets the time 
and date for a file from DOS, concat- 
enates the time and date together, 
and returns the concatenated result. 
The functions gregs( ) and dos( ), 
used to access DOS, were presented in 
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this column last month. 

The assignment on lines 129-30 
merits some attention. Regs.x.dx and 
regs.x.bx are both shorts. A short, 
shifted left 16 bits, evaluates to 0, so 
dx has to be cast into a long before the 
shift. Similarly, if regs.x.cx isn’t cast 
into a long, thei will behave unpredict- 
ably, depending on whether sign ex- 
tension is active. However, now we 
have to AND the result of the type 
conversion with Oxffff to defeat the 
sign extension (or else we may end up 
setting the entire top 16 bits to 1). 

The function getline( ) (lines 
200-251) is useful enough to merit 
some notice, too. It works something 
like gets( ) except that it recognizes 
line continuation (lines ending in \) 
and it allocates buffer space using 
malloc( ). I’ve used it in several other 
programs. 

The final routine to look at here is 
make( ) (lines 302-381); all the real 
work performed by mk is done here. 
Make( ) is recursive. To make a sin- 
gle object, you have to make the de- 
pendent files. If any of the dependent 
files were remade, you then have to 
perform the action on the current file. 
When make( ) returns, the dates on 
the remade files will have been modi- 
fied to the current date. Consequent- 
ly, the time and date comparisons for 
the target and the dependent file (on 
line 339) must follow the recursive 
make( ) call (on line 327). If any of 
the dependencies were younger than 
the target, doaction is incremented 
(line 350). We don’t actually do the 
action on line 350 because we don’t 
want to do it several times. 

Finally, mk uses a system( ) call 
(line 368) to execute each action line. 
In Unix, system( ) creates a parallel 
process running the shell then passes 
its argument through to the spawned 
shell. Because Unix supports true 
multitasking, the only real penalty in- 
volved in a Unix system( ) call is the 
time it takes to activate the shell. 

MSDOS is another matter. Sys- 
tem( ) actually reads a second copy 
of command.com into memory then 
executes the command line with this 
second copy. Because command.com 
uses about 21K and because the pro- 
gram being invoked takes up some 
space, as does mk itself (about 15K in 
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my version), memory can disappear 
pretty fast. ’ve a bunch of memory, 
so this limitation hasn’t been a prob- 
lem, but it may be for you. 

There are two solutions. The better 
of these works only if you aren’t go- 
ing to use any functions internal to 
command.com (more importantly, 
you can’t run a batch file from inside 
mk). The Lattice compiler supplies 
several system( )-like procedures. In 
particular, the various fork( ) func- 
tions (forkv, forkl, forkvp, forklp) 
will execute another program direct- 
ly, without the additional invocation 
of command.com. These functions 
are something of a misnomer as they 
don’t behave like the Unix fork( ) 
function; however, at the cost of a lit- 
tle overhead (you have to extract the 
program name from the action), you 
can use a fork( ) function instead of a 
system( ) call to do the action. If your 
compiler doesn’t have a fork( ) or a 
system( ) call, you can create one us- 
ing the DOS version 2 EXEC function 
(Ox4b). I can print a system( ) func- 
tion in this column at a later date if 
enough people need one, but most 
compilers seem to come with this 
function. 

The second solution to the space 
problem is more involved. Instead of 
doing the action from inside mk, the 
program can create a .bat file and 
exit—you can then execute the batch 
file from outside mk. If you’re run- 
ning DOS version 1, you have to use 
this procedure because the EXEC 
function isn’t supported. The prob- 
lem here is that the time and date as- 
sociated with a target are dynamical- 
ly updated by mk when the target is 
remade (on line 374 of the listing). 
This new time is used by previous in- 
vocations of the subroutine make( ) 
to see if they need to do an action. 
Because gtime( ), the routine that 
does the updating, looks at the real 
file, it can’t be used for updating if 
this file hasn’t actually been modi- 
fied. So, in addition to replacing the 
system( ) call on line 368 with a 
fprintf( ) call, you need to replace the 
gtime( ) call on line 374 with either a 
representation of the current time 
and date or with some constant that 
looks like a very young time and date 
(i.e., Ox 7fEfTfFFL). 


DeSmet 
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8086/8088 
Development 


Package ] 09 


FULL DEVELOPMENT PACKAGE 
Full K&R C Compiler 
Assembler, Linker & Librarian 
Full-Screen Editor 
Execution Profiler 
= Complete STDIO Library (>120 Func) 


Automatic DOS 1.X/2.X SUPPORT 
BOTH 8087 AND S/W FLOATING POINT 


OVERLAYS 


OUTSTANDING PERFORMANCE 
« First and Second in AUG ’83 BYTE 
benchmarks 


SYMBOLIC DEBUGGER ‘50 


Examine & change variables by 
name using C expressions 

Flip between debug and display 
screen 

Display C source during execution 
Set multiple breakpoints by function 


or line number 


DOS LINK SUPPORT 


- Uses DOS .OBJ Format 
- LINKs with DOS ASM 
- Uses Lattice® naming conventions 
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One final caveat: system( ) pre- 
pends the argument /c to the com- 
mand when it executes EXEC. (The 
process is described in section 7 of the 
version 3 DOS Technical Reference 
and in the version 2 manual some- 
where.) Anyway, if you’ve used the 
SWITCHAR feature described earli- 
er, DOS will be confused by the /, so 
set the switch character back to / be- 
fore you use mk. 


Erratum: I’m embarrassed to ad- 


mit that my complaints last month 
about the erase-screen and erase-in- 
line functions of ANSI.SYS were un- 
founded. I was using puts( ) to do my 
output and the extra newline charac- 
ter came from puts( ), not from 
ANSLSYS. 


Notes 

'Unix is a registered trademark of 
Bell Labs. 

*Polymake, Ps-make, and Pmaker 
are registered trademarks of Poly- 


eC Ch es f Lis f in S (Text begins on page 96) 


tron, Phoenix, and Unipress Soft- 
ware, Inc., respectively. 


DDJ 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 195. 


l: #include <stdio.h> 

2 

3: #include <mydos.h> 

byw 5 J Re ek Fa ee ag a a ee DE on es eae, ig * / 
5: #ifdef NEVER 

6: #define DEBUG 1 /* Include for debug diags in make() ef 

7 f2fFend it 

8: #define MAXLINE (80*10) /* Maximum input line length % f 

9: #define MAXBLOCK 64 /* Max number of lines in an action * / 

10: #define MAXDEP 32 /* Max number of dependancies * / 

ll: #define COMMENT '#!'! /* Delimits a comment = / 

12: #define MAKEFILE "mkfile" /* Name of makefile *] 

13: #define OPEN Ox3d {*. Dos function call:-to, open a fre =F 

14: #define CLOSE Ox3e /*- Dos tamncti on cal-. ts -elése a fi fet t7/ 

15: #define DATETIME 0x57 [Co get or set (file's date .& time -*/ 

16: #define DEFTIME 0x0 /* The default time returned by gtime when a file 
ays * doesn't exist. 

18: ef 

BP tf Ra ete See ee aes PL ae ee ce ee 
208. = iswhite(c) evaluates. true: Tf cc. is) white spate, 

flies skipwhite(s) skips the character pointer s past any white space 
no mg skipnonwhite(s) skips s past any non-white characters. 
bia Se 


24: #define 
Zon fietine 
26: #define 


iswhite(c) 
skipwhite(s) 


skipnonwhite(s) while( *s && 


Cee Users" 


while( iswhite(*s) ) 


PoC) Saree SNE) 


++Ss; 
fiswhite(*s). ).++s:; 


BE fs ie my ey Se ROE Sap ee eo Oe es ae a ee eee a eet ee 
28: * The entire makefile is read into memory before it's processed. It's 
29: * stored in a binary tree composed of the following structures: 

30: * depends_on and do _this are argv-like AYrays GF pointers to character 
a1 % * pointers. The arrays are null terminated so ne. count-is required. 
a2: * The time field<ts 4°32 hte long consisting of the date and time 

J32° *. fields retuned from ‘a DOS: 0x57 call. ‘The date ahd time are 

34: * concatanated with the date in the most Significant 16 bits and the 
35: * time in the least significant. This way they can be compared as 

36:  * a single number. 

ao 27 ey 


38: typedef struct Peg 


40: struct. tn 
Al: struce stn 
104 


*lnode;: 
*rnode; 





/* pointer to left sub-tree * / 
{/* HPointer<to right sub-tree * / 


(Continued on page 106) 
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Periscope ... A Direct Hit! 


“A great debugger ... If you’ve been frustrated by 
programs that don’t behave the same for the debugger 
as when running alone, or that crash altogether, you 
should check out Periscope ...”’ 


PC REPORT, Boston Computer Society 









“It works, and works well!! In the first day of use I 


finished up two weeks of problems!! Really ex- 
cellent!!!?’ 


Peter Loats, Periscope User 


Periscope’s differences hit home! Its 
breakout switch gives you control, even when in- 
terrupts are disabled. Periscope’s unique power 
helps you solve the difficult problems. Debug device- 
drivers, memory-resident, and non-DOS programs. 


Great for straightening out confused C 
pointers! Using its breakpoint power, you can stop 
on reads and writes to ranges of memory. Stop on 
registers, words, and bytes, too. 


It’s tough. Periscope’s 16K RAM board is write-protected. Runaway 
programs can’t touch crucial debugger code! Examine the system, safely, at 
any time: Periscope saves the interrupt vectors and buffers it uses, then 
restores them when done. It uses ROM BIOS calls for functions except file 
access, so DOS can’t clobber itself. 


It gets you moving. It’s commands are similar to Debug’s, so you’ll 
master it quickly. On-line help is there when you need it. You can define the 
windows you want; you can design easy-to-read memory displays. Periscope 
supports C, Assembler, BASIC, and Pascal. Comprehensive symbol sup- 
port gives you a roadmap through memory tying back to your source. 


It’s risk-free. Periscope is backed up by a 30-day, money-back guarantee! 
The board is warranted for a year. Technical Support? You get the best 
there is ... direct from Brett Salter, Periscope’s author! 


It requires. An IBM PC, XT, AT, Compag, or close compatible; PC- 
DOS, 64K RAM; a disk drive and an 80-column monitor. With two 
monitors, Periscope’s screen is displayed on the monitor not in use. With 
one monitor, a keystroke switches screens. 


It’s power you can afford. At $295, you can afford Periscope’s 
professional power. The system includes the memory board, breakout 
switch, debugger software, manual, and quick reference card. 


Order now! Call toll-free (800) 722-7006 to place your order or to get 
more information. MasterCard/VISA accepted. 


Get your programs up and running; 


uP PERIS E! 


Data Base Decisions/14 Bonnie Lane! Atlanta, GA 30328/(404) 256-3860 


Circle no. 31 on reader service card. 








Free Book Bonus 
Subscribe Today! 


S ubscribe today to /c, Que’s monthly 
journal for C programmers, and re- 
ceive FREE acopy of Que’s newest C book, 
the C Self-Study Guide. 


W ith this special offer, you’ll “square 
away’ two great C values. Not only 


will you gain valuable programming insight 
from the techniques featured monthly in 
/c, but you’ll also improve your basic C 
programming skills with the tutorial mate- 
rials presented in the C Self Study Guide. 


RS 
Gung av 


i) Tt 





D on’t wait. Call today to order your /c 
subscription ($60 inside U.S., $80 
outside U.S.) and to receive this $16.95 
value FREE. This offer expires September 
30, 1985. 


CALL TODAY 
AND ORDER! 
1-800-227-7999, ext. 66 


OuUC 


Que Publishing, Inc. 
P. O. Box 50507 
Indianapolis, IN 46250 
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C Ches f Lis ting (Listing continued, text begins on page 96) 


Az: char *being made; /* name of file heing made * / 
43: char **depends_on;/* names of dependant files * / 
44; char **do this; /* Actions to be done to make file */ 
a5: long time; /* time & date last modified «7 
AO: } 

47: TNODE:.: 

BOS f Fa Si et et ie a i i Sten a oe ch here Wie see Wi a hie is ae * / 
49: static TNODE *Root ay Qu se /* Root of file-name tree * / 
50: static FILE *Makefile : /* Pointer to opened makefile #y/ 
Sif static. int Inputline = 1 ; /* current input line number m/f 
52: static char *First gained /* Default file to make * / 
53: extern char *malloc(); /* From standard library * / 
54: extern char *koetblock(); /* Declared in this module * / 
55: extern char *setline(); /* ditto ey 
56: extern TNODE *find(); /* ditto oT 
SF PR me a cn et si i sie ei pepe hk ges a ped oh anim eek =i 
58: char *emem( numbytes ) 

59: [{ 

60: {* Get numbytes from malloc. Print an error message and 

61% sa abort if malloc fails, otherwise return a pointer to 

O25 * the memory. 

63: *y. 

64: extern char *calioet): 

65: ehar * Vhs 

66: iff. \(C pie calloctl,numbytes)::)) 

67: err("Out of memory"); 

68: return p; 

os: 

LOS] Re ew oe So + ee ee et Sk oil oo el Ske ee a ee * / 
Pi ee ee FeStaVeStr , MaAxvVece) 

Fen -Cchar "ot rs 

Pot f 

7A: 7 "Str" is a string of words seperated from each other by 

ot * white space. Stov returns an argv-liffe array of pointers 
76: ad to character pointers, one to each word in the original 

ke ” string. The white-space in the original string is replaced 
183 & with nulls. The array of pointers is null-terminated. 

79: * "Maxvect" is the number of vectors in the returned 

80: * array. The program is aborted if it can't get memory. 

os * Fy 

82 

a3 char FEVeGt, Fay: 

84: vp = vect = (char **) gmem( (maxvect + 1) * sizeof(str) ); 

85: while( *str && --maxvect >= 0 ) 

86: { 

87: skipwhite(str); 

88: ‘Vp = Stxr:."s 

89: skipnonwhite(str); 

90: ir lo eer 2) 

ais *str++ = 0; 

92: } 

93: ¥yp =O: 

94; return( vect ); 
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95: } 


96; /*---------------------~------------------------- +--+ 5-5-5 === * / 
97: long getime( file ) 

98: char FELLS Ss 

992) 

100: /* Return the time and date for file. 

£01: * 

102: * The DOS time and date are concatanated to form one 

203-2 - large number. Note that the high bit of this number 

104: * will be set. to: 4d for all’ dates-atter-2043,. which wid 

£05 % * cause the date comparisions done in make() to not work. 
106: * THIS ROUTINE IS NOT PORTABLE (because: it assumes a 32 

107: * bit long). 

108: es 

109; static REGS regs; 

110: short handle = 0; /* Place to remember file handle */ 
qack’s long time; 

Li23 gregs( &regs ); 

113: regs.h.ah = OPEN ; /* Open the file = / 
114: reps ih wal y= Os /* for read ey 
115: reys.%.8x=- shore) (£4Te3: 

116: if( dos(&regs) & CARRY ) 

‘Lav: { 

118: /* File doesn't exist. Return a huge date & time x) 
119: return DEFTIME; 

120: } 

Les else 

+223 { 

Leos handle = réegs.x.ax; 

124: regs.x.bx = handle; /* Put file handle in BX * / 
125+ regs.h.ah = DATETIME; /* Get or set date and time a 
126: regs. hal = 0: /* Get the date and time * / 
127 if( dos( &regs ) & CARRY ) 

128: err("DOS returned error from date/time request"); 
129: time j= Chiene )}C reessx.dx=) <<) 36) | 

130: ((lene)t regex ts.) &. Oettere): 
131: regs ti.ah = CLOSE /* Close the file: handie wy 
eg: recs tie. =~ handie.> 

133% if (dost &regs :.)78s CARRY ~) 

Lt err("DOS returned error from file close request"); 
Lv return time; 

136.2 } 

ES 32e%} 

138; /*---------------------------------------------------------------------- mh, 
139: TNODE *makenode() 

140341 

141: /* Create a TNODE;. filling: it-from-the makefile 

142s * and return a pointer to-it. Return NULL if there are no.more 
L43's * objects in the makefile. 

144: * 

145: char tine; tie; 

146: TNODE *nodep; 

147; unsigned date, time; 


(Continued on next page) 
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C Ch es f Lis ting (Listing continued, text begins on page 96) 


148: First, skip past any blank lines or comment lines. 
149: 7% Return NULL if we reach end of file. 

150: ah 

ao. do { 

t32% if( (line = getline(MAXLINE,Makefile)) == NULL ) 

£533 returnt NULL): 

154: } while ( *line == 0 || *line == COMMENT ); 

bo F tes A this point we've gotten what should be the dependancy 
£563 * line, Position: Lp «to point at the colon. 

157: ay 

158: for( ip =-lines-F1p. 2m Fp te 07 ¢7 > Dp++ ) 

ra) ; 

160: fe If. we find the<coltn postion, ip to point at ‘the first 
lol: * non-white character following the colon. 

162: * / 

L633 fit Fig fee 

164: ere( “nteeing st? 3 /8°This wilt abort “the- program. */ 
L053: else 

166: for ¢, *lpes -=.0%) iswhite(*l pp): 3--bpe+ 2) 

LF ; 

168: j* 

169: ** Allotate and inztiatize..the TNODE; 

Lv Oe * / 

Lvs nodep = (TNODE *) gmem( sizeof(TNODE) ); 

as nodep->being made = line ; 

Leos nodep->time = gtime( line ); 

Lis nodep->depends_on = stov( lp, MAXDEP ); 

£eS nodep->do_this = getblock( Makefile ); 

176: return( nodep ); 

1 TS) 

178%) /¥H-= ~~ 32 2 oe ep oo oh ss ee eee 7 
179: dependancies() 

L60s of 

1-1 /* Manufacture the binary tree’ of objects to make. First 

Lao * is’a pointer to the fixgst<target file. listed inthe 

£83; * makefile (ier. the-one te’ make -if. one isnt: explicit ly 

P34: * given on the command line. Root is the tree's root pointer. 
ce a | 

186: TNODE *node; 

187: if( node = makenode() ) 

188: { 

189: First = node->being made ; 

19s if( !tree(node, &Root) ) 

191: err ("Cant insert first. fede, inte.trée 7 ti\n"): 
192: while( node = makenode() ) 

193: ift({ ttree( node, &Root ) ) 
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194; free( node ); 


195: return 1; 

196: } 

1:94 return 0> 

PIS e3-,} 

199; /*----~---------------------~------~~----------------------------~+--~~+---- ef 
200-2. chat *setline( maxline, fp ) 

Z013 “FILE ea Des 

202 E.-% 

203: /* Get a line from the stream pointed to by fp. 

204: = "Maxline" is the maximum input line size (including the 
205: * terminating null. A \ at the end of line is 

206 * recognized as-.a line continuation, (the lines 

20'7.% = are concatanated). Buffer space is gotten from malloc. 
208: * {f.a-line.is longer ‘than maxtine.it:4i5°truncated Cte; 
209: * all characters from the maxlineth until a \n or EOF is 
£143. * encountered are discarded. 

Zt.5% * 

212% * keturns;:. NULL..on‘a-mallioe failure -or-—end cof files 

21:33 * A pointer to the malloced buffer on success. 
214: * f 

Pat static char Shut /* 

216: register char FDp 2 

Zor: register int Sq. 2aeTr 

218% * Two buffers are used. Here, we are getting a worst-case buffer 
219; * that will hold the longest possible line. Later on we'll copy 
220: * the string into a buffer that's the correct size. 

o21° * / 

R22e if( !(bp = buf = malloc(maxline)) ) 

L423: return NULL; 

27G% while(1) 

225: { 


(Continued on next page) 


Now With Windowing! 
$49.95 Basic Compiler 


MTBASIC 


Thunder Software 





ms. A major 
a users ales 


Features: 
Multitasking 
Handles interrupts 


Windowing 
Interactive 







l{+, //e, 7/c. Source code for libraries is-4 
Only $49.95 
8 ASSYST: The Asse 





ers guide, demo 
grams! Great for be 


more line AaiabeEs: Only $39.95 


POB 31501 Houston Tx. 77231 
713-728-5501 


Visa, Mastercard, COD, checks accepted 
Add $3.00 for P&H 


Circle no. 100 on reader service card. 
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C-BUNDLE $99 


VIEW: CRT Based Disk Diagnostic 
EZZAP: ROM Burning Utility 

includes schematic 
C-PACK: Utilities in C 
C-Games: User Modifiable Maze Game 
All are written in C, include Source Code, 
and available separately. 


CPM TM Digital Research 
as STM Microsoht 
hee SIS TM Intel Corp 


Lia Wares 303-327-4898 


Box C e Norwood, CO 81423 






Circle no. 130 on reader service card. 


Fast native code 
Floating point 


Compiles quickly 
No runtime fee 


MTBASIC is a true native code compiler. It runs Bytes's Sept. 
‘81 seive in 26 seconds; interpreters take over 1400 seconds! 
Because MTBASIC is multitasking, it can run up to 10 Basic 
routines at the same time, while displaying ten separate win- 
dows. Pop-up/down menus are a snap to implement. 


MTBASIC combines the best of interpreters and compilers. To 
the programmer, MTBASIC appears to be an extremely fast 
interpreter. MTBASIC compiles a typical 100 line Basic pro- 
gram in 1 second, yet it generates blindingly fast code. No 
more waiting for long compiles. 


AVAILABLE for CP/M (Z-80) and PC-DOS systems. 


ORDERING: Specify format when ordering. We accept Visa, 
MC, checks and COD. Send $49.95 plus $3.50 shipping and 
handling ($10 overseas) to: 


SOFIAID, Inc. 


P.O. Box 2412 Columbia,MD 21045-1412 
301/792-8096 





Circle no. 88 on reader service card. 
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C Ch es f Lis ting (Listing continued, text begins on page 96) 


226°: 
227: 
228: 


2293 


230: 
231% 
2523 


233% 
2343 


Zaws 
236° 
ie Se 
238 


ose 
240: 
241: 
242: 
243: 


244: 
245% 
246: 


247% 
248: 
249: 
Zoe 
aoa 


aud 


25% 
254: 
fs 
256% 
259% 
258: 
259° 
260: 


261: 
262: 


263% 
264: 
265: 


266: 
267: 
268: 
269: 
270: 
areas 


272% 
2738 
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char 
FILE 


/* Get the line from fp. Terminate after maxline 
* characters and ignore \n following a \. 


* / 
Inputline++; /* Update input line number ay 
fer (osastes0 (Cc et eetc(ip)) “ts 20P. 26 cte yn os Lastc =) 
if( --maxline > 0O ) 
*bpt++ = C3 
LEE! RE ee eee ae Bes Pate te es) EVID) 
break; 
else if( maxiine >° 0.4 /* -6rvase the \.*/ 
~—bp; 
} 
ep ca Os 
if( (c == EOF && bp == buf) || !(bp = malloc((bp-buf)41))_) 
{ 
/* ff HOE wast he firstcharacter onctiie line or 
* malloc fails when we try to get a buffer, quit. 
ay 


free(buf); 
retura(: NG) 
} 


Strepy. Gib ye eitie le /* Copy the worst-case buffer to the one */ 
(*°thatiis the foreee’ si gednd. as. * / 
free C pays /* free the original; worst-case buffer,---*¥/ 
return : Ci bpe. }s /* returning a pointer to the copy. ey 
Sati ery loa dre geen SNE Me AEN, erly er TU gD Se io td ie GRR ee anaes Oe * / 
*Foetblockh. fp 9 
*fp; 
/* Get a block from standard input. A block is a sequences of 
* lines terminated by a blank line. The block is returned as 
* an array of pointers to strings. At most MAXBLOCK lines can 
* be in a block. Leading white space is stripped. 
es 
char *p, *lines[MAXBLOCK], **blockv = lines ; 
int blockc = Os 
do { 


if( !( p = getline(MAXLINE,Makefile)  )) 
break; 


skipwhite(p); 
if( ++blockc <= MAXBLOCK ) 
*blockv++ = p; 


else 
err("action too long (max = %d lines)", MAXBLOCK): 


pwhide (> Fey 


/* Copy the blockv array into a safe place. Since the array 
** returned by getblock is NULL terminated, we need to 
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274: * 


Lncrement' DrOckKC cf prest. 


275» ¥F 

276: blocky >= (char -**¥)-.omem( : Chlocké,; 4+ 1]1).* ‘sizeof (blockvEO))); 

ZTE: movmem( lines, blockv, blockc * sizeof(blockv[0]) ); 

278: blockv[blockc ] NULE:-3 

279°: return blockv; 

2802} 

281: /*------------------------------------------~---------------------------- * / 


282: err( msg, param ) 


2622 ¢nar *MSQ; 

284 Ff 

29°52 /* Print the error message and exit the program. 

286: ef 

287.3 fprintt (stderr "Mk .(%s dine 2d):' ", MAKEFILE, -Inputline); 
288: fprintf(stderr, mse, param -)+ 

289: exit); 

290: } 

291: serr( msg, param ) 

292+ -char *mseg, *param; 

erat 

294: /* same as err() except the parameter is a string pointer 
295: = instead of an int. 

296: *} 

297: fprintt (stderr s."Mk -(4s-1Line 2d): “, MAKEFILE, -Inputline-)* 
298: fprintf(stderr, msg, param ); 

299: exLetids 

300: ) 

301; /*------------~-------~+~+~---------+----+-~------+---~-------------- ---- - - = ------- ey 


302: make(what) 
205%: char “what-: 


@*° Advanced 
? Trace86" 


Symbolic Debugger & Assembler Combo 


Full-screen trace with single stepping; 
Even backstepping! 


Write & Edit COM & EXE programs 
Conditional breakpoints (programmable) 


Switch between trace and output screen; 
Or set up two monitors 


8087, 80186, 80286, 80287 support 
Write labels & comments on code 
Polish hex/decimal calculator 
and more... Priced at $175.00 


To order or request more information contact: 
af Morgan Computing Co., Inc. 


2520 Tarpley Rd. Suite 500 
Carrollton, TX 75006 


(214) 245-4763 





Circle no. 128 on reader service card. 


Dr. Dobb’s Journal, August 1985 





FORTRAN 
PROGRAMMERS 


Discover why 
you should be using 
F77L 
the complete implementation 
of the ANSI FORTRAN 77 
Standard for the IBM PC and 
compatibles. 
If you are serious about your 
FORTRAN programming, you 
should be using F77L. 


$477 
oa 
<< Lahey Computer 
as) Systems, Inc. 

31244 Palos Verdes Drive West, Suite 243 
Rancho Palos Verdes, California 90274 
(213) 541-1200 
Serving the FORTRAN community 
since 1969 


Circle no. 104 on reader service card. 
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NOW C HERE! 


CROSS SOFTWARE 
for the NS32000 


Also Available for IBM PC 
INCLUDES: 
* Cross Assembler * 


* Cross Linker « 
* Debugger * 


* N.S. ISE Support * 
* Librarian * 
* Pascal Cross Compiler * 
* C Cross Compiler * 


U.S. prices start at S500 


SOLUTIONWARE 


1283 Mt. View-Alviso Rd. 
Suite B 
Sunnyvale, Calif. 94089 
408/745-7818 *« TLX 4994264 





Circle no. 118 on reader service card. 


111 


C Ch es f Lis f in gS (Listing continued, text begins on page 96) 


aa sf 

305: [= Actually do the make. The dependancy tree is descended 
306: * recursively and if required, the dependancies are 

AOE $ * adjusted. Return 1 if anything was done, O otherwise 

308: * / 

309: TNODE *snode; /* Source file node pointer * / 
310: TNODE *dnode; /* Dependant file node pointer */ 
ate int doaction. = 0°; {/*-If true do.the, action * / 
3:3 static: char *¥zero =i (char -*j)0: 

383 char **linev = &zero ; 

314: #ifdef DEBUG 

315: Siatict':.3nt recurlev = 0; /* Recursion level * / 
316; printf("make (lev 2d): making <Zs>\n",. recurlev, what); 

317: #endif 

318% if({: t¢snoede: =. findtwhat;, Root)).) 

319: serr("Don't Know-how ..to make. <%s>\n")- what.) 

420% if( !*(linev = snode->depends on)) /* If no dependancys * / 
5212 doaction++; /* always: do the action. Ff 
322% for(..:.:*linev -3/Finev++~) /* Process each dependancy */ 
$2.3: { 

324: #ifdef DEBUG 

ja 8 recurlev++4; 

326: #endif 

327% make( *linev ); 

328%. #iftdef. DEBUG 

s20% recurlev--; 

330: #endif 

wots if( !(dnode = find(*linev,-Root).):) 

332: serr("Don't know how to make <%s>\n", *linev ); 
333: #ifdef DEBUG 

334: printf("make (lev 42d): source file.) recurlev): 

a3: ptime( what, snode->time ); 

33h: prantf( "make (lév 2d): dependant file", recurlev); 

337% ptime( *linev, dnode->time ); 

338: #endif 

339; if( snode->time <= dnode->time ) 

340: { 

S414 /* If source node is older than (time is less than) 
342: * dependant node, do something. If the times are 
B43; * equal, assume that neither file exists but that 
344; * the action will create them, and do the action 
345: * / | 
346: #ifdef DEBUG 

347: printf("make (lev 2d): 4s older than %s\n", 

348: recurlev, what, *linev ); 

349: #endif 

370: doaction++; 

aad 2 } 

352: #ifdef DEBUG 

353° else 

354 - printf("make (lev 2d): 2s younger than %s\n", 

355: recurlev, what, *linev ); 
356: #endif 

257: } 
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SG: 
359: 
360: 
361: 
362: 
363: 
364: 
465°: 
366: 
307: 
368: 
369: 
eLOs 


Ba, 1% 
342: 
7.3% 


S74: 
ai5: 
TiLO% 


TALS 
378; 
ste 
380: 


Dare. 


ope tig 


* Tree .routines: 


383: 
384: 


385: 
386: 
387: 
3ooe || 
389: 
390: 
391: 


if(.doaction ) 


{ 
#ifdef DEBUG 


printf("make (lev 4d): 


#endif 


for( linev = 


( 


snode->do_this; 


*linev; 


doing action:\n", 
recurlev, 


*linev, what): 


linev++ ) 


printf("%s\n", *linev); /* Echo action to screen */ 


#ifndef DEBUG 


if( system(*linev) ) 


serr("Can't process <%s>\n", *linev ): 


#fendiff 


/* Change the source file's time to reflect 
x 


any modification. 


-y 
snode—->time = 


#ifdef DEBUG 


printf("make (lev 2d): 


#fendif 


return doaction; 


*find( key, 
KE ¥ 5 
*root; 


root ) 


rc na NT A IN a a ne en ee ee 


gtime( snode->being made ); 


exiting\n", recurlev ); 


/* If key is in the tree pointed to by root, return a pointer 


* €o .2tZ 


*/ 


else return OQ, 


(Continued on next page) 





public domain software 


FOR THE BEST OF US... 


he = tHecypHer’ sit. 
A COMPLETE 68000 & Z80A 


SINGLE BOARD COMPUTER SYSTEM 
WITH ULTRA-HIGH-RES GRAPHICS!! 


Users’ 







FREE ae FREE 
68000 FORTH feeen Seem 68000 FORTH 
[ AND a AND 
CYPHER-DOS fame mer CYPHER-DOS 
(CPM-80 (CPM-80 
COMPATIBLE) jam aes’ Ye 


See, COMPATIBLE) 
Over 45 volumes of 68000 BASIC eee : 


including: 


compilers 

editors 

text formatters 

communications z 
packages Ps 







(OPTIONAL MUSIC! RO 

R * 16K MONITOR EPROM 

RTS (ZSIO}) e 4K STATIC RAM (EXPA 

S MANAGEMENT FOR Z80 « PROGRAMMABLE BAU 

9 1434") © PARALLEL ASCII KEYB 

e FULL 68000 EXPANSION BUS (60 PIN HEADER 
BUFFERED BUS 





FOR FAST IMAGE TRANSFERS TO. 
37) 


2.2. CP-M-80 3.0, CP-M-68K. CYPHER 
68000 BASIC IN ROM. NEC 7220 
ON 









¢ many UNIX-like tools ie’ LOWER PRICES! NOW 1 MEGABYTE cyPHER AT $1,299.95 
tA TE SCHEMATICS $20.00 * COMPLETE “CYPHER” WITH z8o 
= ~ 80 BIOS. 68000 BIOS MEGABYTE DRAM. 128 VIDEO DRAM. NEC 
Write or call for more details oR TOR OPES OOS 59999 AMD SERIALS ASSEMGLED BNO TESTED, 
$94.95 1.29 
7 $154.95 
The C Users Group 04.95 DEALER AND MANUFACTURING FRANCHISE INQUIRIES 
A/D D/A CYPHER OPTION $100.00 
415 E. Euclid © Box 97A os fic a 
McPherson, KS 67460 NT omer sme mus DOLLARS a 





Circle no. 17 on reader service card. 


“~~ MOTEL COMPUTERS LIMITED 

174 BETTY ANN DRIVE, WILLOWDALE, 

TORONTO, ONTARIO, CANADA M2N 1X6 
(416) 229-4727 


(316) 241-1065 


Circle no. 83 on reader service card. 
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TURBO PASCAL™ TOOLS 
With Super Tools™M and Turbo, YOU can write pro- 
grams that ‘‘pop up’’ from within Lotus 1-2-3TM, 
dBASE etc. In addition, we've included source code 
to Super Macs, a resident keyboard macro processor! 


Routines included let you. . 
¢ Write Sidekick™M-like resident programs. 
© Redefine keyboard. 
Save and restore screen windows 
Write strings directly to video 
Read strings from screen. 


Super Macs™M keyboard enhancer’s features: 
¢ 200 simultaneous keys defined. 


© 1000 characters maximum per macro. 
e Resident macro editor. 
Load & save from within programs. 
Predefined macros for Turbo and Dos. 


Additional routines: 
e Time and date access. 
e Dos program execution and return. 
¢ Dos memory allocation. 


For your copy of Super Tools send $54.95 to: 


Sunny Hill Software 
13732 Midvale N., Suit 206 © Seattle, WA 98133 
(206) 367-0650 


Turbo Pascal & Sidekick trademark Borland Int'l. Lotus 1-2-3 
Reg. trademark Lotus Dev. Corp. dBase trademark Ashton Tate. 





Circle no. 10 on reader service card. 


113 


C Ch es f Lis f ing (Listing continued, text begins on page 96) 


392: 
393: 


394: 
See 


396: 
397 3 


398: 
399; 


400: 


401: 
402: 
403: 
404: 
405: 
406: 


407: 
408: 


409: 


410: 
411: 
472% 
&i3: 


414+ 
aS 


416: 
417: 
418: 


419: 


&20+% 
421: 
422% 
A232 
424: 
425% 
426: 


427: 
428: 


429: 
430: 
S34 3 
re Pe 
33: 


434: 
435: 
436: 
&3.7% 


438: 
439: 
440: 
441: 


register int notequal ; 
register TNODE *¥rval : 
LEC. Presta) 
return 0; 
if( !(notequal = strcmp(root->being made,key)) ) 
returnt“roat.*)* 
return( find( key, (notequal > 0) ? root->lnode : root—>rnode)- +5 
} 
[¥en eh a eS ee ie eee eee * / 
tree( node, rootp ) 


TNODE node, **rootp 3 


{ 
/* If node's key is in the tree pointed to by rootp, return 0 
* else put it into the tree and return l. 
ai 
register int notequal ; 
register TNODE *¥rval : 
if(. *rootp == NULL ) 
{ 
*rootp: = node; 
returns ts 
} 
if( !(notequal = strcemp( (*rootp)->being made, node->being made))) 
return O's 
return( tree( node, notequal > O ? &(*rootp)->Ilnode 
&(*rootp)—>rnode) y¢ 
} 
Pi 8 ag a cl BA eles Rg EE cs 3s lle eee eg * / 
main( argc, argv ) 
char *F aroevs 
{ 
L* A stupid version of the unix make utility. 
* 
* 
a7 


if( !(Makefile = fopen(MAKEFILE, "r")) ) 
err("can'-t open 29 \n 3) MAXREPILE |); 


if( !dependancies() ) 
err("Nothing to make"); 
else 
make. Bret > 2 2 arevil)} +  RErPse)3 


) 
#ifdef DEBUG 


{Bone tee See ee See ae oe eee Se Se ee a eee ee eee Sess 
* Msc. Debugging routines 

wf 

ptime€ file, tt.) 

cnar *file; 

long i 
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442: 
443: 
444; 
445: 


446: 


447: 
448: 


449: 
450: 
451: 


452: 
453: 
454: 
455: 


456: 


457: 
458: 
459: 
460: 
461: 


462: 
463: 
464: 
465: 
466: 
467: 
468: 
469: 
470: 
471: 
4jJ2* 


473: 
474: 
475: 
476: 


Os 7s 
478: 


479: 
480: 
481: 
482: 
483: 
484; 


485: 
486: 


487: 
488: 
489: 
490: 
491; 


/* Print out the time and date field of°a TNODE as 


* "mm-dd-yy hh:mm:ss" 
* File is the file name. ; 
* / 3 


int date, time: 


date ‘= Cr >> 26) -&- Ox fFEEL-:: 

time =t'& OxEfETL + 

prinuct (a2. Pike 3s 

printf("202d-Z202d-Z02d, ", (date >> 5 ) & OxOf, date & Oxlf, 
80.#-€Cdate. >>. 9} &- Ox ian} 

princlC "202d 34202052020 "Ss ttime >>. 1 2) ROOK, (hime 35255028 Ox3f, 


(Cime << 1) &. Ox3e%.'¥ 
erincet(™ yar-ys 








eclipse aie gh Sr Sate a ee og ea ee Say, Oe ae Re * / 
pnode( node ) 
TNODE *node; 
{ . 
/* Print out the tree node pointed to by "node" 
¥f 
char **linev; 
prank P00 4s=~— so se he \n"); 
printf("| node at Ox%x\n", , node ); 
printf("+-----------~--~-~~---~~~~--~~~- Xn): 
printf("| lnode = Ox%x, rnode = Ox%x\n",node->1node,node->rnode); 
printf("| time. ‘= Ox%Zlx =" » node—->time | )3 
ptime( "", node->time ); 
printf("| target = <%s>\n" 7 » node->being made } 
printf("| dependancys:\n" : 
for( linev = node->depends_on; *linev; printf("|]\t%s\n", *linev++) ) 
printf("| actions:\n" ); 
for( linev = node->do this; *linev; printhet 1 \tZe\n", *linev++) ) 
printf ("4+----------~~---~-~----~---~--~.~ \n"); 
} 
Fc itl wer A lg tar gE ili Da EAD a aeons de aig a eo sO i eal * / 
trav( root ) 
TNODE ¥root ; 
/* Do an in-order traversal of the tree, printing the 
* node's contents as you go. 
%] 
if( root == NULL ) 
FREUraS 
trav( root—>lnode ); 
pnode( root ); 
trav( root—>rnode ); 
} 
#endif 
End Listing 
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16-BIT SOFTWARE TOOLBOX 





by Ray Duncan 


Bug Report: TEE Filter 

Dr. Fred Sinal of Hampton, Virginia, 
writes: “There is a slight bug in your 
listing of TEE in the April 1985 ‘16- 
Bit Software Toolbox’ column. Actu- 
ally the bug is in DOS, but that’s life. 
If the file does not end with a CR/LF, 
we get a ‘disk is full’ message. DOS is 
forcing CR/LF to the console and 
confusing the character count. This 
problem may be covered up by elimi- 
nating the pair of lines 


cmp ax,nchar 
jne tee7 


before the label tee4. Of course this 
reopens the disk full problem, when 
redirecting the standard output. I 
could not find a truly satisfactory fix.” 


Some Musings about DRI 
Most of you have probably seen the 
recent splashy full-page ads for Digi- 
tal Research’s GEM that are appear- 
ing in nearly every magazine except 
Sports Illustrated. These ads lead 
you to believe that you can get a 16- 
color equivalent of Macintosh Mac- 
Paint for the IBM PC by just picking 
up GEM and GEM-Paint for a few 
pence at your corner computer store. 

Beware: The fine print in the ad 
says ‘appropriate graphics hardware 
required.” The appropriate hardware 
turns out to be the IBM Enhanced 
Graphics Adaptor, which will set you 
back about $1200 for the required 
controller board, memory expansion, 
and higher resolution RGB monitor. 
If you use GEM on an “ordinary”’ 
IBM graphics adaptor, the icons, win- 
dows, and all the rest are in vibrant 
black and white. 

Speaking of Digital Research, look 


before you leap into spending any 
money on the product that DRI is ad- 


vertising (with tongue in cheek, I’m 
sure) as “Concurrent PCDOS.”’ It’s 
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concurrent, I guess, but it certainly 
doesn’t resemble current versions of 
PCDOS. “Concurrent PCDOS” does 
not support the hierarchical file struc- 
ture or any of the Unix-like executive 
services that are present in MSDOS or 
PCDOS versions 2 and 3. In other 
words, ‘Concurrent PCDOS”’ sup- 
ports only the functionality of 
MSDOS or PCDOS version 1, which 
was more or less a clone of CP/M. 

Thus, almost any of the more pow- 
erful MSDOS applications you are 
likely to buy will not run properly un- 
der “Concurrent PCDOS.” Further- 
more, a recent review in PC Tech 
Journal demonstrated that a set of 
programs run concurrently under 
“Concurrent PCDOS” will actually 
take longer to complete than if you 
simply run them consecutively under 
normal MSDOS. You can draw your 
own conclusions, but Digital Re- 
search’s hopes of recapturing its old 
dominance of the personal computer 
operating system market seem more 
like delusions to me. 


More on Square Roots 
Tom Prince, of Marblehead, Massa- 
chusetts, writes: 

“TI was interested in your discus- 
sion of square rooting in the May 
1985 column. A similar algorithm in 
8088 code appeared in Dr. Dobb's 
over a year ago, encouraging me to 
add a floating point square root to my 
collection of Z80 code. Since the Z80 
has enough registers to perform 32- 
bit calculations, it can do the square 
root much faster than the 8080 or 
even 8088 can do a floating point di- 
vide. Imagine my surprise to see an 
integer square root that takes ten 
times as long as a divide, even when 
coded in assembler! Even a conver- 
sion to floating point to take the root 
ought to be faster. 

“So I wrote up the following code 


for a well-known ‘32-bit’ processor. It 


turns out to be slower than 
sqrt(float( )) but certainly doesn't 
take ten times as long as an integer 
divide. Of course it takes longer than 
the three integer divides that are in- 
cluded and would run faster if coded 
in assembler. Would it be too much to 
ask to provide high-level language 
versions of routines like these that 
work perfectly well, if a bit slower?” 

Mr. Prince’s code can be found in 
Listing One (page 122). 


Mac Fan Strikes Back 
Mr. S. Allen, of Ojai, California, 
writes: 

“Tam, and have been for quite a 
while, an ardent admirer of DDJ. | 
have been hard-pressed to find a 
magazine of such technical excel- 
lence aimed at the more advanced 
computer user. 

“TI do, however, have a GRIPE! I 
was quite excited when you began the 
16-Bit Toolbox. I expected to find 
droves of information on the latest 
hardware innovations and the sup- 
port software to go with them. You 
can imagine my chagrin when I dis- 
covered a thinly disguised “The IBM 
PC is Wonderful’ column. To call the 
IBM PC, with its 8088, a 16-bit ma- 
chine is pushing things a little, and 
then to have the writer launch irra- 
tional tirades against a true 16-bit 
machine (the Mac) lit my Bulls—t 
High Level Light. 

‘Please, be honest. If you are going 
to have an IBM PC column, call it 
that. If you are going to have a 16-bit 
column, let’s have it be about 16-bit 
machines. From reading the present 
16-Bit Toolbox, I must assume that 
the writer is either in IBM’s or Intel’s 
pocket. Your magazine has a long- 
standing reputation for impartiality. 
I implore you, do not destroy it.” 

Well, I suspect that the flip-flop 
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controlling Mr. Allen’s Bulls_—_t 
High Level Light is in need of re- 
placement. Let me first assure DDJ 
loyal readers that I am not in either 
IBM or Intel’s pocket. If I were, I’d 
ask them for a suitably monstrous 
amount of money, retire, and pass 
this column on to other younger and 
more energetic souls. 

People who actually read this col- 
umn know that it is heavily devoted 
to reports of bugs in Microsoft, IBM, 
or Intel products, so that program- 
mers can work around them. These 
bug reports hardly constitute adver- 
tisements for the companies involved 
(except, I guess, for those who have 
the philosophy that any publicity is 
good publicity). I defy anyone to look 
back at the previous columns and 
anywhere find the message ‘‘The 
IBM PC is Wonderful.” 

As for our emphasis on the Intel 
8086 family of microprocessors and 
the MSDOS operating system, these 
remain the dominant force in the per- 
sonal computer world and seem likely 
to remain so for the forseeable future; 
consequently, they are of primary in- 
terest to those of us who write pro- 
grams for a living. Whether the 8088 
is really a 16-bit processor or not is a 
moot point; it runs the same machine 
code as the 8086, it acts like an 8086, 
and it is everywhere. Quibbling over 
the bus width is a waste of our time. 

We certainly are interested in ex- 
tending our coverage of other 16-bit 
processors, and as people who actual- 
ly read this column will also know, we 
have given considerable coverage to 
the 68000 and Macintosh over the 
last few months and will continue to 
do so as long as our readers indicate 
an interest in it. 


Regarding 68000 
Assemblers 

Mr. Michael Aichlmayr, of Tacoma, 
Washington, writes: 

“In regards to Mr. Howell’s re- 
marks in your May 1985 column, I 
would like to add myself to the list of 
people who feel it is truly possible to 
build an efficient assembler for the 
68000—one that would run in a rea- 
sonable amount of memory and exe- 
cute in a productive amount of time. 

“I don’t feel that the 68(x)xx fam- 
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ily is nearly as complicated as Mr. 
Howell implies. I think elegant sim- 
plicity is a more accurate statement. 
Any good programmer could make 
great use of generic addressing 
modes and instructions. I think I 
would hazard to go so far as to say 
that I believe it could be done in C 
and run in 64K on a 68(x)xx proces- 
sor (the horrible overhead of the [In- 
tel] 80(x)xx would make it a real 
challenge). I have a 6809 assembler 
written in C that runs easily in 64K of 
memory on every machine for which 
it is compiled. 

“It’s very sad to realize that the 
abundance and low cost of memory 


have given programmers an excuse to 
be gross and inefficient. I have seen 
code that could run in my HP 29C 
calculator take up more than 64K of 
memory and ‘require’ a 128K IBM 
PC or compatible to run. It makes me 
think that if a machine came stan- 
dard with a megabyte of RAM, some- 
one would come up with a desk calcu- 
lator that would hog the machine. 
“Mr. Howell remarks that he has a 
6809 system that he likes better than 
his IBM compatible. I direct his at- 
tention to the TSC (Technical Sys- 
tems Consultants) 68000 macro as- 
sembler. I have been able to coax the 
assembler to run in 32K on a 6809 


® We have over 300 


complete, tested, and, documented functions. 


All source code and demo programs are included. 


© The library was specifically designed for software 
development on the IBM PC. XT. AT and compatibles. There are no royalties. 


© Over 95°o of the source code is written in C. Experienced programmers 
can easily ‘customize’ functions. Novices can learn from the thorough comments. 


We already hare the functions you are about to neute 


Concentrate on software development— not writing functions. 


THE C UTILITY LIBRARY includes: 


e Best Screen Handling Available ¢ Windows e Full Set of Color Graphics 
Functions @ Better String Handling Than Basic @ DOS Directory and File Man- 
agement @ Execute Programs, DOS Commands and Batch Files ¢ Complete 
Keyboard Control e Extensive Time Date Processing e Polled ASYNC 
Communications @ General DOS BIOS gate e Data Entry e And More e 


@ The Library is compatible with: Lattice. Microsoft. Computer Innovations. Mark Williams 
and DeSmet. Available Soon: Digital Research, Aztec and Wizard. 


C Compilers: Lattice C— $349. Computer Innovations C86 — $329: Mark Williams C — $449. 


C UTILITY LIBRARY $185. Special prices on library & compiler packages. 


Order direct or through your dealer. Specify compiler when ordering. Add $4.00 shipping for 
UPS ground, $7.00 for UPS 2-day service. NJ residents add 6% sales tax. Master Card. Visa. 


check or P.O. 


ESSENTIAL SOFTWARE, INC 


P.O. Box 1003 Maplewood, New Jersey 07040 914 762-6605 





Circle no. 36 on reader service card. 






aN _ Transform Your Programs 
eBavard k. & with 


Pe CPP—C Preprocessor Plus 






















#08 9,8 


Includes ALL features of the standard C preprocessor 23: 

¢ Define arbitrarily complex macros with #define command. 

¢ Include and nest files to any depth with #include command. 

¢ Conditionally include or exclude lines with #if, #ifdef and 
#ifndef commands. 

¢ Optional extra feature: Imbed formatting or other commands 

in your source code. (Lines starting with . or « are ignored.) 


Fast and flexible ® 

e 30 times faster than the Pic heweane published in Dr. Dobb’s 
Journal. 

¢ Can be used for any language, including assembler. 

® Can be used as a stand-alone macro/ include processor. 

e Code can be used as the lexical analyzer for parsers or 

assemblers. 















Complete 

¢ You get complete SOURCE CODE in standard C. 

e You get everything you need to use CPP immediately. 

° CPP is unconditionally guaranteed. If for any reason you are 
not satisfied with CPP, your money will be refunded promptly. 


Price: $50. 


Call or write today: 


Edward K. Ream 
1850 Summit Ave., Madison, WI 53705 


(608) 231-2952 
TO ORDER: Specify both the operating system (MS-DOS, CP/M 80 or CPM 68h) 
and the disk format (8 inch CP/M or the exact type of 5% inch disk). Send a check or 
money order for $50 ($60 for foreign orders). Foreign checks must be denominated in 


U.S. dollars drawn on a U.S. bank. Sorry, | do NOT accept phone, credit card o1 
COD orders. Please do NOT send purchase orders unless a check in included. 
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Where did ATal and 
SONY find the Tools 


to C them thru? 
The Application Programmer’s Toolkit!!! 


A Wizard! Ware” product from Shaw-+: American Technologies 


APT” provides you with everything you need to 
increase your C programming productivity, including: 


@ COMPLETE SOURCE CODE (over 5000 lines!) 

@ File handling with direct & keyed access 

@ Screen and Report Generators, with full screen handling for your programs 

®@ Generic Terminal Driver for portable code 

@ String math functions, and string manipulation routines 

@ Reference Manual on Disk (over 50 pages) 

@ Tutorial Manual (over 25 pages) with Source for Mailing List Manager 

@ A host of useful Utilities, Database and File Editors 

@ Available for Microsoft (3.0), Lattice, Mark Williams, DeSmet, BDS, Aztec, C1-C86 
C-STARTER Toolkit!: Binary APT, DeSmet C, “Programming in C on the IBM-PC” 


NOW MORE AFFORDABLE!! 


AP TIMS-DOS Versions ty. 508. 6 tes eg" tie Gs Sewn Bw Diet, oes $395 
APT/DeSmet C & BDS C versions...........-...2-+-+-205- $295 
C-Starter (binary APT, DeSmet Compiler and Book) ......... $295 
BT AGMUURS GEIG «ese a Re Pact Ak eas a OE 2 Ge ee es $ 45 
** NEW PRODUCTS! Available Now or Coming Soon: ** 
ADAPT: English-language, applications generator...........- $295 
BIZ-WIZ: Comprehensive Accounting Package.............-.- $495 
FLORA: Graphics Toolkit, with MAC-like capabilities........ $ 95 


APT-WINDOWS!: APT-Compatible/stand-alone window mgt:! . . 
db2c: dBaselIl/III TO C Source Code Translator and Libraries! .CALL 
Dr. Shaw’s DOS- Shell: a UNIX- like shell for DOS. ts. S32 ee 


Trademarks: MS-DOS & Microsoft C/Mi t, Latti ttice, C86/Mark assist C Ware, CI-C86/Computer Innovations, BDS C/BD Hosieare 
Aztec/Manx Software. U UNE RtaT ArST, T SONY S Boas a Corp.. Macintos eh Apple i Coctpame . dBasell & dBaselIl/Ashton-Tate, ADAPT/Wilmes Syste: 
FLORA, Biz Starter/Shaw - American Technologies. 


Call (502) 583-5527 
Shaw * American Technologies 





Wezard Ware" 
ed 830 South Second St. - Box 648 es 
‘| Louisville, KY 40201, USA wae 
(C.O.D. and Foreign Orders - Add $5 Shipping/Handling) 
References: Bank of Louisville, Citizens Fidelity Bank, Louisville Chamber of Commerce 
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Realtime on MSDOS? Csharp can do it! Get the tools without operating system overhead. Cut development time with C source 
code for realtime data acquisition and control. Csharp includes: graphics, event handling, procedure scheduling, state system 
control, and interrupt handling. Processor, device, and operating system independent. Csharp runs standalone or with: MSDOS, 
PCDOS, or RT11. Csharp runs on: PDP-11 and IBM PC. Csharp includes drivers for Hercules and IBM graphics boards, Data 
Translation and Metrabyte iO boards, real time clock, and more. Inquire for Victor 9000, Unix, and other systems. Price: $600 
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system running under the FLEX oper- 
ating system. I realize it does not pro- 
duce relocatable object modules; 
however, that piece of code would be 
fairly small given the architecture. 

“Having a 6809 machine (which I 
built), a Mac (which I tolerate), and 
a DG One IBM compatible (which I 
use), I think I can safely assume that 
I have some knowledge of hardware 
and software. I find it very aggravat- 
ing that IBM chose the 80(x)xx archi- 
tecture over that of the 68(x)xx, but I 
have never seen a processor more 
crippled than that in the Mac. 

““T eagerly await the arrival of the 
Atari ST, which I have had the op- 
portunity to play with for a while. If 
all appearances are correct, this is a 
good use of a 68000. The machine 
runs at 8 MHz, has 32K [of RAM 
devoted to] memory-mapped color 
graphics, and is said to come stan- 
dard with 512K of RAM for $699.00! 
I’m not sure what the GEM OS is go- 
ing to do to the thing since I have lit- 
tle regard for DRI, but it doesn’t look 
bad so far.”’ 


More Mac Feedback 

Kirk Kerekes, of Tandata Inc., in 
Tulsa, Oklahoma, submitted a 
thoughtful and interesting letter: 

“As circumstances seem to have 
started a debate in your column re the 
Mac as a development environment, I 
felt it appropriate to provide some 
facts to fuel the debate and perhaps 
redirect it to more substantive issues. 

“FACT: There is no assembler that 
I know of for the Mac that requires 
the use of two (or more!) Macs. This 
myth has been floating around for 
quite a while and was recently men- 
tioned in your column. This myth 
doubtless arises from the fact that 
there are two Apple-issue debuggers 
that use a second computer as a con- 
trol device to allow undisturbed 
screen displays on the system being 
debugged. As there are around half a 
dozen debuggers that do not require a 
second unit, and at least one of the 
two-machine debuggers will use any 
reasonable terminal as a remote con- 
troller, I see no reason to regard this 
situation as anything but a blessing 
for the developer. The debuggers are 
available as part of the Inside Mac 
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supplement program and are distrib- 
uted as a group. 

“If you are doing development on 
the Mac and are a fan of debuggers, 
then the $100 price tag of the supple- 
ment could be justified for them 
alone. (I’ve gotten at least $100 
worth of micro-floppies through my 
supplement subscription, just valued 
as media!) 

“FACT: There are numerous com- 
plete, stable high-level languages for 
the Mac. A recent glance reveals at 
least three Forths, half a dozen Cs, a 
Pascal or two, Microsoft BASIC, and 


language. I can state that at least one 
product of a professional nature, 
MegaMax C, is ‘real,’ well-supported, 
and quite clean. Assembler fans can 
obtain the MacAsm mentioned in 
your column or ask almost anybody 
for a copy of the prerelease versions of 
the Apple Editor /Assembler/Linker / 
Resource Compiler package. By the 
time this might see print, the official 
release of the MDS+ Inside Mac 
package should have occurred. This 
package is already on the certified de- 
veloper’s price list. The price is lower 
than any complete serious develop- 
ment environment available for 





Evolution. 


Now FoxBASE, the dBASE II source- 
compatible interpreter/compiler, is even 
better than before. Automatic 8087 co- 
processor support allows you to perform 
numeric computations with lightning speed. 
Fourteen-digit precision gives you 40% 
greater accuracy than dBASE Il. The fact 
that FoxBASE is not copy protected means 
you can easily load it onto your hard disk. 
What's more, FoxBASE comes complete with 
a NO-RISK demo plan. 

Of course, FoxBASE still offers all of 
the features that dBASE II does. . . PLUS 
© Runs 3 to 20 times faster ¢ Permits up to 
48 fields/record...50% more than dBASE II 
© Supports full type-ahead ® Compiles pro- 


Developed by 


DACOR 


COMPUTER SYSTEMS 


dBASE I! is a trademark of Ashton-Tate. 
UNIX is a trademark of AT&T 
FoxBASE is a trademark of Fox Software Inc. 


gram sources into compact object code ® Has 
twice as many variables ® Comes with a so- 
phisticated online manual and HELP facility. 

FoxBASE is currently available on a wide 
range of machines: IBM-PC, IBM-PC/XT/AT, 
COMPAQ & IBM compatibles, TI Professional, 
DG Desktop, and DG MV-Series to name just 
a few. And it will soon be available on the 
Molecular and NCR Tower computers as well. 
Call or write today for more information. 


MS-DOS: Development Pkg. $395 
Runtime Pkg. $695 
AOS/VS: Development Pkg. $995 
Runtime Pkg. $1995 


UNIX and XENIX: (To Be Announced) 


trom FOX SOFTWARE INC. 


13330 Bishop Road, P.O. Box 269, Bowling Green, OH 43402 / 419-354-3981 / TWX 810-499-2989 
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MSDOS. 

“FACT: The bloated size of most of 
the early Mac applications is the re- 
sult of the use of Lisa Pascal as the 
development environment. There is 
absolutely nothing about the Mac 
that requires/generates bulky code. I 
have created useful Mac-interface 
programs with a load module size less 
than 1K using the MegaMax C com- 
piler. An ‘empty’ C program 4i.e., 
main( ) {} ) yields a load module of 
about 300 bytes. Most of this appears 
to be information that any applica- 
tion stores for use by the Finder. I 
just tried the same experiment with 
Computer Innovations C86 under 
MSDOS and got a 5K EXE file result, 
due to C86’s insistence on loading the 
standard I/O library whether or not 
it is invoked. 

“POINT: Nobody at Apple denies 
that the Mac concept, from mouse on 
up, is derived from the Xerox PARC 
research. The point in the Mac is to 
take the PARC concepts and imple- 
ment them in an affordable machine. 


Go price a Xerox Star and then price 
a Mac (first, find a Star!).”’ [As this 
column went to press, Xerox an- 
nounced a new incarnation of the 
Star, the model 6085, that costs 
$4995 with | Mb of RAM, 10 Mb 
hard disk, a 15-inch display, and a 
mouse.... RD] 

‘““OPINION: I develop professional- 
ly on MSDOS, CP/M, and Mac sys- 
tems. I use the major development 
products in each environment for 
both C and assembly language. It is 
my opinion that there are better de- 
velopment environments available for 
the Mac than for MSDOS or CP/M. 
The Mac development products tend 
to be less expensive, too. There are 
also some real losers available for all 
these environments. I’m not going to 
name names; we all have our own fa- 
vorite turkeys. 

‘““OPINION: There are a number of 
programming professionals who fee! 
threatened by the Mac. It is not my 
purpose to speculate why this should 
be the case. It is my purpose to assert 


9 TRACK TAPE CONTROLLERS 


AND %2” TAPE 


MODEL TC-PC 

TC-PC is a high performance 9-track tape 

controller for the IBM-PC with these important 

features: 

e Reads and writes industry standard Y2-inch 
tape 

° eenciatile with most formatted tape drives 

e Standard 8-bit parallel recording with parity, 
and read-after-write verification 

e Switch selectable I/O address (four contiguous 
ports required for operation) 

e Maximum data transfer rate of 192,000 bytes 

per second 

Record length from 1 to 65,535 bytes 

Supports up to 8 tape transports 

Jumper selectable DMA channel 

Modes: PE and NRZI at 800, 1600, 3200 and 

6250 bytes/inch 

Installable device drivers allow creation of 

application programs which run under IBM 

XENIX and MS-DOS 

Operates with IBM-PC and -XT; Compaq 

Portable: Zenith PC-150; Sperry PC; the 

Leading Edge Computer, and other 100% 

IBM-PC compatible equipment. 


MODEL TC-50 

TC-50 offers all the standard features of the TC- 

PC with these additional enhancements: 

e Maximum data transfer rate of 400,000 
bytes/second; 904,000 bytes/second with 
memory option 

e Operation with a wider range of IBM- 
compatible machines, including IBM-AT; 
Compaq Desk Pro; ATT 6300 and others 


XENIX and MS-DOS are Registered Trademarks of Microsoft Corp 
IBM-PC/AT/XT are Registered Trademarks of International Business Machines Corp 
Compag Portable and Compaq Deskpro are Registered Trademarks of Compaq Corp 


AT&T 6300 AT&T Information Systems Corp 

Sperry PC Sperry/Univac Corp 

Zenith PC-150 « Zenith Data Systems 

Leading Edge is a Registered Trademark of Leading Edge Products, Inc 


SUBSYSTEMS 


A variety of software utilities is supplied as part 
of the TC-PC and TC-50 packages, including: 


e DEPOT (Data Exchange Program with Optional 

Translation) 

DEPOT provides a means to transfer data 

between system disk and magnetic tape, 

allowing: 

— Data interchange from tape to disk, and 
disk to tape : 

— Conversion from ASCII to EBCDIC, and vice 
versa 

— Positioning to arbitrary location prior to 
data read 

— Specification of record length and block 
factor when writing from disk to tape; 
allows deblocking when reading from tape 
to disk 

— Multiple operations to be specified from a 
command file 


e TAU (Tape Archive Utility) 
— Provides individual file backup and restore 
— Allows use of MS-DOS wild cards such 
teal 
— Provides disk drive selections for /O 
— Changes pathname selections from within 
TAU 


— Provides data encryption for security 
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WARRANTY 


All Overland Data products carry a 30-day 
unconditional money-back guarantee, and are 
warranted for one year, parts and labor. 


OVERLAND DATA, INC. 


5644 Kearny Mesa Road #A 
San Diego, CA 92111 
Tel. (619) 571-5555 
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that no professional need feel threat- 
ened by the Mac. With the tools cur- 
rently available, it is a joy to develop 
on, and there are enough ‘goodies’ in 
the system toolbox to keep just about 
anybody happy. There is definitely a 
learning curve involved, enough of 
one to be a barrier to dabblers, but 
anyone familiar with good modern 
programming practices can produce 
useful programs in very short order. 
The Mac environment punishes slop- 
py programming practices and great- 
ly rewards programmers who plan 
thoroughly before they code. 

‘““Maligning the Mac is not going to 
make it go away. Being annoyed by 
Steve Jobs or marketing hype is not 
realistic. The only tool Apple has to 
battle IBM in the public mind is flam- 
boyance. Steve Jobs’ opinions may not 
be yours, but you know his name, 
Playboy readers know his name, and 
an amazingly large percentage of the 
general public knows his name. Now, 
what is the name of the CEO of IBM? 
Of any officer of IBM? See how it 
works? 

“IT propose that further discussion 
of development on the Mac actually 
center on development on the Mac 

. not on myths and spurious side 
issues! There is plenty to discuss, be- 
lieve me!” 

In reply, I only question whether 
the only tool Apple has to battle IBM 
is flamboyance. The tried and true 
tools of delivering quality products on 
time seem to have served some compa- 
nies pretty well (such as Compaq, 
which has taken on IBM head-on and 
is doing better than Apple at it in 
many respects). The rest of Mr. Ker- 
ekes’ points are well taken, and indeed 
we will try to stick to substantive dis- 
cussion of the Mac in the future. By 
the way, the CEO of IBM is John 
Akers (last I heard); although this 
fact probably isn’t a part of the gener- 
al knowledge of the average Playboy 
reader, it is fairly common knowledge 
in the computing community. 


Reading about the Mac 

I have run across two recent articles 
about the Macintosh that are both 
helpful and balanced (unlike the ra- 
bid pro or con articles that are preva- 
lent in the popular computer press). 
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FULL SCREEN SYMBOLIC DEBUGGER 


“THE SINGLE BEST DEBUGGER 
FOR CP/M-S80. A TRULY 
AMAZING PRODUCT.” 


LEOR ZOLMAN 
AUTHOR OF BDS C 


Complete upward compatibility with DDT 

Simultaneous instruction, register, stack & memory displays 
Software In-Circuit-Emulator provides write protected memory, 
execute only code and stack protection. 

Full Z80 support with Intel or Zilog Mnemonics 

Thirty day money back guarantee 

On-line help & 50 page user manual 


ONLY P12. 
—SOFTADVANCES — 


P.O. BOX 49473 AUSTIN, TEXAS 78765 (512) 478-4763 
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IEEE 488 TO 5-100 
INTERFACE 


Controls IEEE 488 (HPIB) Instruments with 
an S-100 computer 

Acts as controller or device 

Basic and assembly language drivers supplied 
Meets IEEE 696 specification 

Industrial quality burned in and tested 

up to 125K bytes/sec under software control 
3 parallel ports (8255-5) 

$375 
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DON’T ASK HOW OURS CAN BE SO FAST... 
ASK WHY THEIRS ARE SO SLOW! 


“.a breath of fresh air. .” 


| . * 
Computer Language, Feb. 85 Now fully compatible with M80 


in .Z80 mode with many exten- 
“.. in two words, I’d say speed & sions. Time & date in listing, 16 


flexibility”, char. externals, plus many other 
Edward Joyce, User's Guide #15 features. 


NORMALIZED PERFORMANCE To order, or to find out more 


Assemble 
ZCPR3 
to create a 
HEX file. 


about our complete family of 
development tools, call or write: 


_.5© LR_Systems 


1622 N. Main St., Butier, PA 16001 
(800) 833-3061, (412) 282-0864 
Telex 559215 SLR SYS 


ASM (2500AD) 
ZAS (Mitek, Echelon) 


D&W DIGITAL, INC. 
20655 Hathaway Avenue 
Hayward, California 94541 
(415) 887-5711 
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1.00 Z80ASM 


C.O0D., Check or 
Money Order Accepted 
1:17 3:26 5:25 6:13 

2Mhz SHIPPING: USA/CANADA + $3 @ OTHER AREAS + $10 
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M@ DATA TYPES 
Lists and Symbols 
Unlimited Precision Integers 
Floating Point Numbers 
Character Strings 
Multidimensional Arrays 
Files 
Machine Language Code 


MEMORY MANAGEMENT 
Full Memory Space Supported 
Dynamic Allocation 
Compacting Garbage Collector 


FUNCTION TYPES 
EXPR/FEXPR/ MACRO 
Machine Language Primitives 
Over 190 Primitive Functions 


10 SUPPORT 
Multiple Display Windows 
Cursor Control 

All Function Keys Supported 
Read and Splice Macros 
Disk Files 


POWERFUL ERROR RECOVERY 
8087 SUPPORT 

COLOR GRAPHICS 

LISP LIBRARY 


Structured Programming Macros 

Editor and Formatter 

Package Support 

Debugging Functions 

.OBJ File Loader 
HM RUNS UNDER PC-DOS 1.1 or 2.0 
Zoe ee ee ee 


IQLISP 
5V4"’ Diskette 
and Manual 






































$175.00 


| q Integral Quality 


P.Q. Box 31970 
Seattle, Washington 98103-0070 
(206) 527-2918 


Washington State residents add sales tax. 
VISA and MASTERCARD accepted. 
Shipping included for prepaid orders. 
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The first is simply a detailed, objec- 
tive, nonhysterical review of the Mac- 
intosh written by Larry Press of Small 
Systems Group; this review appeared 
in Abacus, Vol. 2, No. 2 (Winter 
1985), page 51. The author is an expe- 
rienced computer user with no partic- 
ular fish to fry who is oriented toward 
the use of the Macintosh in education- 
al contexts. 

Abacus, by the way, is an intriguing 
publication that shows signs of devel- 
oping into a unique and useful maga- 
zine. The quality of writing is high, 
the percentage of advertisements low, 
there is virtually no boosterism of 
‘in’ computers or software products, 
and the magazine is eclectic. The is- 
sue mentioned contained articles on 
human computers (how calculating 
prodigies perform arithmetic), a re- 
port on personal computers at Amos 
Tuck School, an exposition of “The 
Applicative Style of Programming,” 
a review of the special Scientific 
American issue on software, and a re- 
port by chess master David Levy on a 
match between himself and CRAY 
BLITZ (winner of the 1983 World 
Computer Chess Championship). 
Abacus is published by Springer Ver- 
lag New York Inc., a source of scien- 
tific and academic texts. 

The second notable article is “Ap- 
ple Macintosh Software” by Dr. Ted 
Lewis of the Computer Science De- 
partment of Oregon State University, 
published in JEEE Software, March 
1985, page 89. This is a combination 
review and tutorial of “the coding 
standards and methods forced upon 
application programmers who accept 


function isqrt(i 
integer*4 i,js #32 bits 
byte j1(4) 


the challenge of writing applications 
for the Macintosh.” It includes a sim- 
ple example program with pull-down 
menus and an explanation of the 
structure and contents of the result- 
ing “resource file.” This article is the 
first reasonable explanation I have 
seen of this subject and is orders of 
magnitude more comprehensible 
than the Apple documentation. 

Dr. Lewis concludes: “The ideas 
and techniques incorporated into the 
Macintosh software are admirable, 
but I am struck by the boldness of Ap- 
ple Computer. Programming a Mac- 
intosh is not easy for conventional pro- 
grammers, and this has contributed to 
the slow appearance of Macintosh 
software. Does Apple expect everyone 
to change? Do they think that a tech- 
nical achievement like the Macintosh 
is inducement enough to persuade 
programmers to wade through 800 
pages of Inside Macintosh merely to 
discover the merits of object-oriented 
programming and Desktop? 

“The Macintosh software is un- 
conventional, nonstandard, and prob- 
ably horribly nonportable. The dia- 
lect of Pascal used is related to UCSD 
Pascal, but there is little hope of sep- 
arating it from the Macintosh ROM 
routines. Yet, the software is nearly a 
work of art; all objects are organized 
in a logical and concise manner. The 
notion of a resource file is powerful 
and will most likely be emulated by 
programmers everywhere.” 


DD) 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 196. 


equivalence(js,j1(1)) #with reversal, j1(4) is high byte of js 
_ #you didn’t take care of zero and negative arguments! | 


-js=i 


#count high order O bits 8 at a time 
for(kO =0;j1(4) = =0;kO=kO + 8)js =ishft(js,8) #shift left 8 bits 
for(;js>0;kO=kO+ 1)js=ishft(js, 1) #count remaining O bits 
#get initial approximation within 50% 
isqrt =ishft(3,ishft(3 1-kO,-1)-1) #3*2**((29-kO)/2),not for i= 1 
do k= 1,3 #improve by Newton iterations 

isqrt =ishft(i/isqrt + isqrt,-1) #(i/isqrt +isqrt)/2 


return 
end 


Listing One 
Tom Prince's square root algorithm 
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FINALLY! 


Communications Hardware and Software that's 
Inexpensive, Easy to Use and Guaranteed. 






































“The Amazing SpiderNet...an 
incredible amount of utility available to 

almost any small-sized application.” 
Ron Exner, 12/84 Hardcopy 


SNARE™—SpiderNet’s Callback Security System 


@ Protects ANY dialup computer system from unauthorized intruders $ 
@ Authorized users are called back at specific locations 595 
@ SNARE secures three modem lines at less than $200/line 

@ Up to three separate computers can use SNARE simultaneously 
@ Uses Hayes-compatible modems or others like DEC’s DF03 
@ Stores 70 authorized users, expands to 150 (300+ soon) 


SpiderNet—Printer/Plotter Sharing Unit 


@ Shares expensive RS-232 plotters, daisy wheel or laser printers $ 
@ Makes laser printers affordable for your office or department 495 

@ Two to five micros or minis can share a peripheral 

@ Connect and use—no software modifications required! 

@ Optional 64K buffer for spooling 


SpiderNet—Computer and Peripheral Networking $495 


@ Six port, intelligent software-controlled RS-232 switch 
@ Share multiple peripherals between systems 
@ Interconnect computers to share data and files 
@ Three pairs of ports can be connected simultaneously 
@ Links ports at different baud rates 
@ Programmable: perfect for custom RS-232 control application 





SpiderNet—Multiplexer, Terminal Concentrator and more = ¢ 405 
@ Five to one RS-232 multiplexer/demultiplexer 
@ 5X1 or 4X2 concentrator for expanding terminal ports 


ENVOY™—Telecommunications Software 
@ Access to electronic mail, remote systems and data networks $49 Q5 

@ Error free, text and binary file transfers via XMODEM or ANSI X3.28 . 
@ Smart terminal mode with capture buffer, autodial and autologin 
@ Easy to use, menu driven, compact and high speed 
@ Utilities menu for copy, type, print, erase and rename files 
@ For IBM PC, PCjr, PC compatibles, Sanyo MBC-55x, 

CP/M-80 or -86 


30-day money-back guarantee on all products 


ARTISOF Tinc 


Box 41436, Tucson, Arizona 85/717 
(602) 327-4305 


Circle no. 51 on reader service card. 





by Robert Blum 


The CP/M Exchange RCP/M system 
is available for your use 24 hours a 
day, 7 days a week. Reach it by dial- 
ing (404) 449-6588. 


Online. . . at Last 

For more than two years I have been 
promising to bring up a RCP/M sys- 
tem in support of this column—final- 
ly, it’s online. I hope you will partici- 
pate in its use and share with me your 
thoughts on how I can improve it. 

To reach it, call (404) 449-6588 
any hour of the day or night, seven 
days a week. The modem is a Racal- 
Vadic 3452, which is capable of com- 
municating at either 300 or 1200 
baud. The other hardware compo- 
nents are an Ampro single-board Z80 
microcomputer driving two 5%-inch 
Teac floppy disk drives and a 20 Mb 
hard disk drive. This configuration 
should be more than adequate, at 
least for the present, to support the 
amount of activity that I anticipate. 

The main purpose of the system is 
to provide improved access to the in- 
formation printed in this column. 
The complete text of all the programs 
and updates printed here will be 
available for downloading. I hope this 
will stimulate even more reader par- 
ticipation in the column by providing 
a convenient method for submitting 
items of interest. I will also maintain 
a current list of all known CP/M bug 
reports and any fixes that might be 
available; this includes application 
notes and fixes published by DRI. 

When your call is answered, hit the 
return key several times to indicate 
the baud rate you are using. Next you 
will be asked whether your terminal 
needs nulls for proper operation. 
Once beyond these two preparatory 
steps, you will enter into the message 
system. From this point on, I think 
the system is self-prompting enough 
to get you started without requiring a 
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lengthy tutorial. 

If you call to transfer program 
files, enter a “J” at the main menu 
prompt to jump to CP/M. Once under 
CP/M control, execute the MAP tran- 
sient program to get a system map, 
which will guide you around the 
system. 

Rather than spend a lot of time 
talking here about what you can ex- 
pect when calling my RCP/M system, 
I suggest that you pick up your phone 
and call. Again, please leave a mes- 
sage outlining your impressions of 
the system and any improvements 
that you might want to suggest. 


The Free Software Catalog 
and Directory 

Public domain software is software 
that legally can be copied, used, and 
given to another user without pay- 
ment of a royalty to its author. 

Estimates project that over 40 Mb 
of program source code are contained 
on the 300+ volumes of CP/M public 
domain software. In this vast library 
can be found just about any type of 
utility program that you might need 
to help manage your CP/M system. A 
number of business application pro- 
grams, mostly written in CBASIC, 
are present as well. 

Until now, many would-be public 
domain software freaks have been de- 
feated by the thought of searching 
through over 5000 program titles to 
find just the few desired. Fortunately, 
Robert A. Froehlich, a long-term 
member of SIG/M and an avid user 
of public domain software, foresaw 
this problem and has compiled a ref- 
erence book detailing and indexing 
each program. 

The Free Software Catalog and 
Directory is a 475-page 8% x 11-inch 
book printed on newsprint stock. It 
focuses on the two largest and most 
readily available free software librar- 


ies, the CP/M Users Group 
(CPMUG) and the Special Interest 
for Microcomputers (SIG/M), while 
providing all the information neces- 
sary for personal computer owners to 
take advantage of this resource. 

The introduction begins by setting 
aside any fears one might have about 
using public domain software. It con- 
cludes by talking a little about the 
main sources of free software. But 
most important is the elaborate tu- 
torial—the best I have seen—for suc- 
cessfully completing a session with a 
remote bulletin board system (BBS). 
This section in itself makes the book 
a worthwhile investment for the nov- 
ice and experienced user alike. The 
remainder of the introduction pre- 
pares the reader for dealing with 
source code files and explains how to 
go about making changes to them, 
should that be necessary. 

The real meat of this book is con- 
tained in the next six sections. Every 
file in the entire 92-volume set of the 
CPMUG library and the first 162 vol- 
umes of the SIG/M library is de- 
scribed in detail. The first and second 
sections, the largest of the six, include 
complete information for each file as 
follows: filename, size in Kbytes, 
CRC checksum, date of entry, lan- 
guage if program source code, au- 
thor’s name, revisor’s name, file title, 
keywords assigned to the file, and fi- 
nally a textual description of the file. 

Of course, the main purpose of this 
book is to provide ready access to in- 
formation about the routines or pro- 
grams of interest to you. The next 
four sections cross reference each file 
alphabetically by keyword, language 
type, author name, and filename. For 
example, if you want to find a pro- 
gram to compare two files for equali- 
ty, your initial search might start in 
the keyword section under utilities. 
You find there two entries. If the one 
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management system available for microcomputers.” That's a powerful statement. But then. 

MDBS Ill is an amazingly powerful software package. So powerful, in fact, that it lets you build 
mainframe-quality application systems on your micro or mini. MDBS III is not for beginners. It's for appli- 
cation developers with large data bases or complex data interrelationships who want to define data base 
structures in the most natural way—without resorting to redundancy or artificial constructs. It’s for profes- 
sionals who can appreciate its extensive data security and integrity features, transaction logging, ad hoc 
query and report writing Capability and its ability to serve multiple simultaneous users. And if you want the 
power and the glory that only the world’s most advanced data management system can provide, MDBS III 
iS for you. For information on MDBS Ill and our professional consulting services, write or call Micro Data 
Base systems, Inc., MDBS/Application Development Products, 85 West Algonquin Road, Suite 400. 
Arlington Heights, IL 60005. (800) 323-3629, or (312) 981-9200. MDBS III. ABSOLUTE POWER. 


ELL GIVE YOU 
THE POWER. 


bi 
TAKE THE GLORY. 


a Not long ago, PC Magazine called MDBS Ill “The most complete and flexible data base 








- MDBS Illis a trademark of Micro Data Base Systems. Inc 
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$5.00 C 


Compiler 





Due to popular demand, Dr. 
Dobb’s Journal has reprinted its 
most-asked-for C compiler articles 
by Ron Cain and J. E. Hendrix, 
each for only $5.00. 


Ron Cain's C compiler from sold- 
out 1980 issues #45 and #48 in- 
cludes “‘A Small C Compiler for 
the 8080s” and “‘Runtime Library 
for the Small C Compiler.”’ 


The J. E. Hendrix reprint includes 
part two of “‘Small-C Compiler 
v.2'' from sold out issue #75 and 
completes the first part of the 
compiler article from issue #74 
which is included in Dr. Dobb's 
Bound Volume 7. 


To Order: Enclose $5.00 for each 
copy with this coupon and send 
to: Dr. Dobb’s Journal, 2464 Em- 
barcadero Way, Palo Alto, CA 
94303 


Outside U.S., add $2.00 per copy for 
shipping and handling. 


Please send 

__. copy(ies) of the Ron Cain re- 
print, and 

—__— copy(ies) of the J. E. Hendrix 
reprint to: 

name 

address 

city State Zip 


ALL REPRINT ORDERS MUST 
BE PREPAID. 

Please allow 6-9 weeks for 
delivery. 
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Now Supports Microsoft 3.0 


on, 


-D OV 


TODAY ! SIVA 

Or send 149.954 \ 

$3 shipping and 

handling. Texas add 7 S 
sales tax. MasterCard and Visa accepted. 


Circle no. 32 on reader service card. 


Announcing... 


Dr. Dobb’s Journal 
Bound Volume 7 


Includes every 1982 issue of Dr. Dobb’s Journal 


Yes! Please send me Volume #7 
lenclose [ | check/money order. 
Please charge my: [_] VISA[ |] M/C[_] American Express 


Card # Expiration Date 


Signature 


Name 
Address 
City 


Volume 7 x $30.75 = $ 


Payment must accompany your order. Mail to Dr. Dobb’s Journal. 
2464 Embarcadero Way, Palo Alto, CA 94303. 
Allow 6-9 weeks for delivery. 


Postage & Handling must be included with your order. 
Please add $1.25 per book in U.S., $2.00 each outside U.S. 


[| _] Please send me more information on other Bound Volumes. 


Programming 
Box 112097 


Carrollton, Tx 75011 
(214)783-9388 
Extended Technical support availab le. 








for comparing binary files sounds like 
it would serve well, note the refer- 
ence: SIG/M volume 115. You can 
then track down a complete descrip- 
tion of the chosen file by referring to 
the second section of the book, which 
covers the SIG/M volumes. 

As if all this weren’t enough, the 
book concludes by listing several 
hundred user groups and bulletin 
board systems by name, location, and 
phone number. 

This book has become the most 
used of any in my bookcase. It is a 
tremendous bargain at $9.95. The 
author has accomplished a phenome- 
nal task in both compiling this much 
material and cross indexing it for 
ease of access. Whether you are an 
individual user of free software or the 
librarian of a user group, you will 
benefit from having this book. 

If you’re having trouble finding a 
source of free software in your local 
area, call the “CP/M Exchange” 
RCP/M system at (404) 449-6588 for 
a list of user groups where public do- 
main software can be found. 


8088: 8- or 16-bit 
Processor? 

The following paragraphs, taken from 
the introduction to the Intel iAPX 88 
Book, set the record straight on how 
the manufacturer intended the 8088 
to be classified: 

“This book describes the unique 
Intel 8088 microprocessor, the out- 
standing choice for 8-bit microcom- 
puter applications requiring both 
high performance and low cost. 

“The Intel 8088 is the most power- 
ful 8-bit microprocessor available to- 
day, yet as easy to use as other 8-bit 
microprocessors designers have used 
for years.” 

Outside of the marketing rhetoric, 
these two paragraphs contain the 
phrase ““8-bit” often enough to dispel 
any doubt that the 8088 was designed 
as an 8-bit processor. 


Exiting Properly to 

CP/M 

Two accepted methods for returning 
to CP/M from an application pro- 
gram are documented by DRI in the 
CP/M 2.2 reference manual. Al- 
though both are said to achieve the 
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same result, in practice they react 
very differently and, depending on 
the situation, can cause a great deal 
of frustration. 

Steve Russell of SLR Systems 
brought this incompatibility to my at- 
tention. In the process of testing one of 
his assemblers, he stumbled onto a 
difference between exiting to CP/M 
by jumping to memory location zero 
(BOOT) and by calling the BDOS with 
a System Reset function. The problem 
occurred when he tried executing sev- 
eral assemblies through a submit file 
in conjunction with XSUB. The first 
assembly finished successfully, but all 
the others failed because for some rea- 
son XSUB was no longer active after 
the first assembly. 

Apparently, the documentation 
wasn’t updated when XSUB was re- 
leased. When loaded, XSUB’s first 
action is to relocate itself immediate- 
ly under the CCP and to modify the 
BOOT address so that it no longer 
points to the BIOS jump table but to 
the XSUB warm start routines. This 
modification is necessary so that 


XSUB can trap any further warm: 


start requests to avoid having to re- 
load memory with a fresh copy of the 
Operating software. Thus, XSUB re- 
mains resident and active. But if the 
BDOS 1s called with the System Reset 
function, a fresh copy of the operat- 
ing software is immediately loaded 
without checking whether XSUB or a 
similar program is active. 

Because XSUB was designed for 
use within SUBMIT batch proce- 
dures, the result of a program return- 
ing to CP/M via the BDOS reset call is 
that suddenly XSUB no longer re- 
mains active: the BOOT vector stored 
at memory location 0 has been reset, 
and a fresh copy of the operating 
software is loaded. Any other pro- 
grams in the same procedure that de- 
pend on XSUB to provide console in- 
put from the batch file will then fail 
to execute as planned. 
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... waiting 
for C programs to 
compile and link? 








Use C-terp 


the complete C interpreter 


This is the product you’ve been 
waiting (and waiting) for! 


Increase your productivity and avoid 
agonizing waits. Get instant feedback of 
your C programs for debugging and rapid 
prototyping. Then use your compiler for 
what it does best...compiling efficient code 
... SIOWLYy. 


C-terp Features 
¢ Full K&R C (no compromises) 


¢ Complete built-in screen editor-- 
no half-way house, this editor has every- 
thing you need such as multi-files, inter-file 
move and copy, global searching, auto- 
indent, tab control, and much more. 


¢ Fast-- Linking and semi-compilation are 
breath-takingly fast. (From edit to run 
completion in a fraction of a second for 
small programs.) 

¢ Convenient-- Compiling and running are 
only a key-stroke or two away. Errors 
direct you back to the editor with the 
cursor set to the trouble spot. 


® Ones Module Support ~ Access functions 
and externals in object modules produced 

by C86 or Lattice C or assembly language. 

Utilize your existing libraries unchanged! 


¢ Complete Multiple Module Support- 
Instant global searches, auto-compile 
everything that’s changed, etc. 


¢ Many more features including batch mode, 
8087 support and symbolic debugging. 


© Runs on IBM PC, DOS 2.x, 192K and up. 
© Price: $300.00 (Demo $45.00) MC, VISA 


Price of demo includes documentation and shipping 
within U.S. PA residents add 6% sales tax. 
Specify C86 or Lattice version. 


GIMPEL SOFTWARE 


3207 Hogarth Lane ® Collegeville, PA 19426 
(215) 584-4261 


*Trademarks: C86 (Computer Innovations), Lattice 
(Lattice Inc.), IBM (IBM Corp.),C-terp (Gimpel Software) 
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POWER PACKS | 


COMPLETE SOURCES 
NO ROYALTIES 


COMPREHENSIVE C Power Packs 
include over 1000 functions which 
provide an integrated environment 
for developing your applications ef- 
ficiently. ‘‘This is a beautifully doc- 
umented, incredibly comprehensive 
set of C Function Libraries.’ 

— Dr. Dobb’s Journal, July 1984 


USEFUL “‘...can be used as an ex- 
cellent learning tool for beginning C 
Programmers...”’ 

— PC User’s Group of Colorado, Jan. 1985 


FLEXIBLE Most Compilers and all 
Memory Models supported. 


RECOMMENDED “‘| have no hesita- 
tion in recommending it to any pro- 
grammer interested in producing 
more applications code, using more 
of the PC capabilities, in much less 
time.” — Microsystems, Oct. 1984 


gg PACK 1: Building Blocks | $149 
DOS, Keyboard, File, 
Printer, Video, Async 
PACK 2: Database $399 


B-Tree, Virtual Memory, 
Lists, Variable Records 


gg PACK 3: Communications $149 
Smartmodem™, Xon/Xoff, 
X-Modem, Modem-7 


gg PACK 4: Building Blocks Il $149 
Dates, Textwindows, Menus, 
Data Compression, Graphics 


gy PACK 5: Mathematics | $99 
Log, Trig, Random, 
Std Deviation 
gg PACK 6: Utilities | $99 
(EXE files) 
Arc, Diff, Replace, Scan, Wipe 
‘Master Card/Visa, $7 Shipping, Mass. Sales Tax 5% 
ASK FOR FREE DEMO DISKETTE 


NOVUM 
ORGANUM 
INC. @ inc. 


165 Bedford St., Burlington, MA 01803 
(617) 273-4711 


Circle no. 90 on reader service card. 
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H.E.L.P. is a completely interactive 
C programming environment with three 
innovative full-sized features that will 
revolutionize the way you write code. 


A Clean Compile — 
Guaranteed! 
S ay Good-bye to all compiler-type 
errors. H.E.L.P. ’s built-in program 
checker (which would embarrass LINT) 
not only hunts down bugs .. . explains 
the proper syntax... gives examples of 
usage ... but will even offer suggested 
corrections. If you want, H.E.L.P. will 
even make the corrections for you... 
at the touch of a key. 


H.E.L.P. also finds semantic errors as 
well as poor style and inefficiencies. 
You can even check the portability of 
your code! 


Multi-Window Editing 
Om as many windows as you want 

. there’s no limitation ...not even 
your own memory. Because H.E.L.P. 
uses a virtual memory system you can 
create programs larger than your 
machine capacity. 


H.E.L.P.’s very powerful editor allows 
you the flexibility to work in several 
windows .. . with several files at the 
same time. 


Save Keystrokes 


H undreds of commands are bound 
to the Keyboard to give you fast 
execution. 


Always be in Control 


N ot only can you develop code in 
many windows at the same time, but 
you can show (and refer to) important 
definitions in one window while creating 
in another. Or open a window and keep 
notes about your program ...ortypea 
memo... ora letter. 


Increase your Productivity 
by 300% or More..... 


| f you are a novice programmer, you'll 
begin writing code like an advanced 
programmer much faster with H.E.L.P. 


ust imagine what H.E.L.P. will do 
for the ADVANCED PROGRAMMER. 


ou’ll have more time to become 

Creative with your algorithm (since 
H.E.L.P. will make sure your code 
compiles the “first time at bat”). 


H.E.L.P. tracks every step you make. 
lf you are not sure about a command, 
just press a key, and you'll get the kind 
of help you need. 





Eliminates Every Bug known to Compilers 
AS well as a few other species 





Check These Features 


@ Multi-window environ- @ Intelligent help sub- 


ment system 
° oe en ®@ User-definable key- 
© Check syntax, semantic, — d bindings 
type usage, intermodule upports color and 
inconsistencies and monochrome 


portability 
®@ Multi-file editing 


© H.E.L.P. supports the 
full C Language 


NOW IN MS-DOS 





Everest Solutions, Inc. 
3350 Scott Boulevard 
Building 58 

Santa Clara, CA95051 
(408) 986-8977 








PC WEEK’S PRODUCT OF THE YEAR 


PC MAGAZINE’S AWARD FOR TECHNICAL EXCELLENCE 





Borland Introduces 
the Laws of TURBO DYNAMICS 


Laws That Work Like Magic. Whether considering DED A soy 
technological excellence, or innovation in <—e 


areas such as pricing, 
not copy-protection, 
licensing agreements, 
site licenses, 60 day 
money-back guarantee 
—Borland is clearly 
recognized as the 
software industry 
leader. The following 
three laws of © Zurbo 
Dynamics’™ exemplity 
our pledge for excellence. 


TURBO PASCAL” $69.95 


The industry standard. With more than 350,000 
users worldwide Turbo Pascal is the indus- 
try’s de facto standard. Turbo Pascal is 
_ praised by more engineers, hobbyists, 
students and professional programmers 
than any other development environment 
in the history of microcomputing. And yet, 
Turbo Pascal is simple and fun to use. Free 
spreadsheet included on every Turbo disk with ready-to- 
compile source code. Options: We offer the exciting Binary 
Coded Decimal (BCD) option for your business applications as 
well as an 8087 option lor Jat eee applica- 





‘$54, 95 


The Turho Sais Toolbox st the perfect , - 
_Gomplement to Turbo Pascal. It cae dae . 














Turbo Dynamics Applies to Turbo Pascal. 
Borland’s Pascal family of products is growing 
= 2 by leaps and bounds. 
You can now join 
hundreds of thou- 
sands of users 
and enter the 
















: dearer an inedible price per- This third law is actually a 


formance ratio. We only| believe _ first in the industry! We are so world of Turbo 

in in absolutely superb software sure that you will love our — l 
tock bottom prices. - — software that all of our pro- Pascal program 
_ ducts now come backed a ming. And 


g 200 day money-back remember, all 


three laws of 
oe Turbo Dynamics 
yee to all Borland products. 


TURBO TUTOR’ $34.95 


From start to finish in 300 pages. Turbo 
Tutor is for everyone from novice to expert. 
Even if you’ve never programmed before 
Turbo Tutor will get you started right away. 
A must. You'll find the source code for all 
the examples in the book on the accompany- 
ing disk ready to compile. Turbo Tutor 
might be the only reference on Pascal and 
programming you'll ever need. 


TURBO GRAPHIX TOOLBOX" $54.95 


High resolution monochrome graphics for 
the IBM PC. 

The Turbo Graphix Toolbox will give even 
a beginning programmer the expert's 
edge. It's a complete library of Pascal 
procedures and functions. Tools that will 
allow you to draw and hatch pie charts, 
bar charts, circles, rectangles and a full 
range of geometric shapes. Procedures that will save and 
restore graphic images to and from disk. And much, much, 
more. You may incorporate part or all of these tools in your 
programs and yet we won't charge you any royalties. Best of 
all, these functions and procedures come complete with 
commented source code 0 on n disk ready to compile. 










FAMIL 3 for the d 
|| (800) 8 
tter dealers raion a ) 2558 08 - 
Available a eet py Credit Car 
nearest you. 


BCD 
pascal 1/8087 a 124. 2 ee 


olbox 
Turbo Databas¢ ° 54.95 —— 


$ 54 
3 


cribe your 


S 
exe s er System! 


Com 
8 bit it — | 


Turbo Graphs 


aie 


The ais 
L\3%" ls" 


Name: he. 


epee 


ing Address: —— 


City hea 


Zip oe 
State: ——_— 


) 
(CA 6% tax 
A MC BankDraft a 


i 


Amount: 


Payment: VIS 
Credit Card Expl" Date: 


\ 
Card #: 


\ 


6% sales tax 


esidents ye a US pank 


s drawn 0 





and Ga lifornia ¢ 


Bor 
nor be accepte? iin a svable e in US dolla’ 


payment by par 


Telephone 


WILL 
hase Orders 
es gd $10and make 


